REVISTA PARA USUARIOS DELA WRUA
NO VIE MB RE 198 8
ANO 3 N« 31
A37 REP.ARGENTINA
NUEVO
PRODUCTO
LENGUAJES Y
iUTILITARIOS
'DISPONIBLES
4 - ^
1 EMi
1 *
m
r.l
‘1
A la computadora personal
Talent
g.
0 )’
nada le es imposible ;
Porque gracias a la norma internacional MSX, la
TALENT MSX trasciende sus propios limites.
Hasta ahora, cuando usted compraba una
computadora personal de cualquier marca, quedaba
automaticamente desconectado del resto del mundo
de la computacion. Porque los distintos equipos y
sistemas no eran compatibles entre si.
Hasta que dos grandes empresas de informatica,
la Microsoft Corp. de EE.UU. y la ASCII del Japon se
pusieron de acuerdo para crear una norma standard;
la MSX. Que se expandio tambien rapidamente en
Europa. Y que hoy TALENT presenta por primera vez
en la Argentina.
Mientras que la mayoria de las computadoras de su tipo
que se ofrecen en el mercado nacional, han sido
discontinuadas por obsoletas en sus lugares de origen,
TALENT MSX tiene casi ilimitadas posibilidades
de desarrollo. Porque la norma MSX es en todo el
mundo inteligencia en crecimiento.
La TALENT MSX pone a su disposicion un mundo de
software para elegir. Y con la incorporacion de todos
sus perifericos llega a ser una autentica computadora
profesional.
UTIL
Su poderoso sistema operative MSX
permite el acceso a todo tipo de
procesamiento de dates:
• Planillas de calculo.
• Procesadores de palabra.
• Graficos de negocios.
• Bases de dates (d Base II. etc.)
• Contabilidad general, sueldos, y
jornales, costos. etc., desarrollados
bajo CP/M en Basic. Coboi. Pascal o C.
Con la posibilidad de conexion a linea
telefonica permite la transferencia y
consulta de dates entre computadoras
personales. profesionales o bancos de
dates.
La grabacibn de archives es en formate
MS-DOS. haciendola compatible con las
computadoras profesionales.
DIDACTICA
Dispone de tres lenguajes para la
ensehanza de computacion; LOGO como
lenguaje de induccion para los mas
chicos. Lenguaje de Programacion en
Castellano, para todos los que quieran
aprender a programar sin conocimientos
previos. Y Basic MSX como lenguaje
profesional Mas una amplia variedad de
perifericos como el Mouse. Lapiz Optico.
Tableta gratica. Track-ball. etc.
DIVERTIDA
La mas genial para Video-Juegos. Por la
amplisima biblioteca de programas
-todos nuevos- de la norma MSX en el
mundo. Y ademas. el Basic MSX permite
al usuario generar sus propios juegos
con un manejo tan simple, como solo
TALENT MSX puede ofrecer.
CARACTERISTICAS TECNICAS
• Memoria principal 64 KB ampliable
hasta 576 KB. .
• Memoria de video: 16 KB RAM.
• ROM incorporada de 32 KB
con el MSX-Basic de Microsoft.
• Graficos completos. hasta 32 sprites
y 16 colores simultaneos.
• Generador de sonido de 3 voces
y 8 octavas.
• Conexion para cualquier grabador.
• Interfaz para salida impresora paralela.
• Conectores para cartuchos
y expansiones.
• Fuente para 220 V
y modulador PAL-N incorporado.
MSX es marca registrada de MICROSOFT CORPORATION
DISTRIBUIDORES AUTORIZADOS: CAPITAL FEDERAL: AMATRIX, Bolivar 173 - ARGECINT, Av. de Mayo 1402 - BAIDAT COMPUTACION, Juramento 2349 - COMPUPRANDO. Av. de
Mayo 965 - COMPUSHOP, Cordoba 1464 - COMPUTIQUE, Cordoba 1111, E. P. - COMPUTRONIC, Viamonte 2096 - CP67 CLUB, Florida 683, L. 18 - DALTON COMPUTACION,
Cabildo 2283 - ELAB, Cabildo 730 - MICROSTAR, Callao 462 - Q.S,P,, Bartolome Mitre 864 - SERVICIOS EN INFORMATICA, Parana 164 - DISTRIBUIDORA CONCALES, Tucuman
1458 - MICROMATICA, Av. Pueyrreddn 1135 - ACASSUSO: MICROSTAR ACASSUSO, Eduardo Costa 892 - AVELLANEDA: ARGOS, Av. Mitre 1755 - BOULOGNE: COMPUTIQUE
CARREFOUR, Bernardo de Irigoyen 2647 - CASTEUR: HOT BIT COMPUTACION, Carlos Casares 997 - LANDS: COMPUTACION LANUS, Caaguazii 2186 - LOMAS DE ZAMORA:
ARGESIS COMPUTACION, Av. Meeks 269 - MARTINEZ: VIDEO BYTE, Hipdiito Yrigoyen 32 - RAMOS MEJIA: MANIAC COMPUTACION, Rivadavia 13734 - SAN ISIDRO: FERNANDO
CORATELLA, Cosme Beccar 249 - VICENTE LOPEZ: SERVICIOS EN INFORMATICA, Av. del Libertador 882 - BAHIA BLANCA: SERCOM, Donado 327 - SUMASUR, Alsina 236 - LA
PLATA: CADEMA, Calle 7 N“ 1240 - CERO-UNO INFORMATICA, Calle 48 N° 529 - MAR DEL PLATA: FAST, Catamarca 1755 - NECOCHEA: CAFAL, Calle 57 N» 2920 - SERCOM, Calle 57
N» 221 6 - TRENQUE LAUQUEN: COMPUQUEN , Villegas 231 - CORDOBA: AUTODATA, Pasaje Santa Catalina 27 - TECSIEM , Santa Rosa 71 5 - ROSARIO: 2001 COMPUTACION , Santa
Fe 1468 - MINICOMP, Maipii 862 - SISOR, Urquiza 1062 - SANTA FE: ARGECINT, P. San Martin 2433, L. 36 -SISOR.'RivadavTa 2553- INFORMATICA, San Gerdnimo 2721/25 -
VILLA MARIA: JUAN CARLOS TRENTO, 9 de Julio 80 - MENDOZA: INTERFACE, Sarmiento 98 - BIT & BYTE, 9 de Julio 1030 - COMODORO RIVADAVIA: COMPOSER, 25 de Mayo 827 -
GENERAL ROCA: DISTRIBUIDORA VECCHI, 25 de Mayo 762 - LA PAMPA: MARINELLI, Pellegrini 155 - NEUQUEN: MEGA, Perito Moreno 383 - EDISA, Roca esq. Fotheringham - RIO
GRANDE: INFORMATICA M & B, Perito Moreno 290 - SAN CARLOS DE BARILOCHE: L. ROBLEDO & ASOCIADOS, Elfein 13, Piso 1° - TRELEW: SISTENOVA, Sarmiento 456 -
PARANA- MARin riARriA I anriHs w fa . PDCAnAQ- rrMTCn ni: r'r^^«PIITnc; Cl nnOAnn Pnlnn OAOa . DCQICTCUriA. CDAMr'n CAMTI r'^irlnc Pollanrini 7R1 - SAN
LOAI>
Director PerlodUtIce
Femanck) Flores
Secretario de Redaecldn
Ari^ Testofi
Redaccl6a
Fernando Pedr6
Arte j DiatframacidB
Fernando AiDenguol
Departamento de FnbUeldad
Dolores Urien
Senrieioe Fetofrifleoa
Infxjge Bank, Oicqr Burriel
Claudio Veloso
EDITORIAL PROBDI
Preeidente
Erriesto del Castilto
Vlceprealdente
Cristkan Plbso
Dlrecter Titular
Amner>gol Torres Sabots
Director Suplente
Javier Compos Malbron
Load Revista para usuarios de la
norma MSX es una publicacidn
mensual editada por Editorial
PROEDI S.A., Parana 720, 5° Pi-
so, (1017) Buenos Aires. Tel.: 46-
2886 y 4^7130. Reoistro Nacio-
nal de la Propiedaa Intelectual:
E.T.M. Registrada. Queda hecho
el depdsito que indica la Ley
11.723 de la Propiedad Intelec-
tual. Todos los derechos reserva-
dos. ISSN 0326-8241 . Impreso en
Impresiones Gr^ficas Tabar6
S.A.I.C., Er4zcano 3158, Capital.
Fotocromo de tapa: Columbia.
Los ejemplares atrasados se ven-
der^n al precio del ultimo nOmero
en drculacibn. Prohibida la repro-
duccibn total o parcial de los mate-
riaies publicados. por cualouier
medio de reproduccibn grbfico,
auditivo o mecbnico, sin autoriza-
cibn expresa de los editores. Las
menciones se realizan con fines
informativos y tbcnicos, sin cargo
alguno para las empresas que co-
mercializan y/o los representan.
Al ser informativa su misibn, la re-
vista no se responsabiliza por
cuaiquier problema que pu^
plantear la fabricacibn, el funck>-
namiento y/o aplicacibn de los sis-
temas y los dispositivos descrip-
tos. La responsabilidad de los arr
tfculos firmados corresponde ex-
ciusivamente a sus autores. Dis-
tribuidor en Capital: Martino, Juan
de Garay 358, P.B., Capital. Distri-
buidor en el interior: D.G.P., Hipb-
lito Yrigoyen 1450, Capital, Tel.:
38-9266/9600.
2 ? J < fJNCfStOK N M
0 g « I 'ARiFA ncoucio*
S U M A R I O ‘ AN0 3 N«31
ASCII
ANUNCIA LA
MSX2 PLUS
En primicia exclusiva pre-
sentamos la nueva versi6n
da la norma MSX. ASCII
completo las especificacio-
nes de la MSX2 Plus,un gran
avance en el continue creci-
miento y desarrollo del es-
tandar MSX. ASCII ya esta
proveyendo a los fabrican-
tes del software del sistema
y de los nuevos chips.
(Pag.6)
AVANZA MSX
EN TODO EL
MUNDO
Frank Berberich, gerente de
la Division Internacional de
ASCII Corporation, creado-
rade la norma MSX, anuncio
en la Argentina el lanza-
miento de los nuevos pro-
ductos de hard y de softwa-
re. (Pag.8)
DIRSORT
que permite realizar un se-
guimiento de un programa
BASIC mas facilmente, por
Presentamos uno de los me-
jores utilitarios que fue men-
cion del ultimo Concurso de
Programas. Tiene porobjeto
ordenar de manera perma-
nente el directorio de un dis-
co atendiendo a distintos cri-
terios. (Pag. 10)
EL NUEVO
MODEM DE
TALENT
que genera una lista con las
Ifneas del software que son
invocadas, ya sea con GO-
SUB 0 GOTO, en cuaiquier
parte de un programa.
Ademas, les presentamos
una lista de los programas
que existen el mercado local
para MSX1 y MSX2. Tam-
bien contamos que paso en
la muestra Expo-Ciencia
'88, que se realizb en la loca-
lidad de Caseros, Pda. de
Buenos Aires. (Pag. 18)
Toient_ II
Telematica ha presentado
recientemente un nuevo
producto en el area de co-
municacion y transmision de
datos. En esta nota descu-
brimos y analizamos las
prestaciones del modem
TMX-520. (Pag.16)
PROGRAMAS
Dirsort (P^ig.10) - Paleta
Grafica (Pag.24) - Plunder
(Pag.28)
SECCIONES
RINCON DEL piJAS
USUARIO
Noticias MSX (Pag. 4) - Soft
al dia (Pag.32) - Buzon
Presentamos un utilitario (Pag.34)
O T I C I A S
WORDSTAR
Este libro de Encarcion Lo-
pez Martin, T. Gomez y
Mascaraque dedicado a u-
suarios de MSX (80 colum-
nas), C-128, PC y compati-
bles ensena a aprovechar al
maximo el procesador de
palabras Wordstar. La obra
es fundamental por estar di-
rigida a los usuarios con in-
tenciones de obtener un me-
jor rendimiento del utilitario.
Ofrece una vision general
del equipo necesario para
trabajar con este procesa-
dor de textos.
El lector descubrira la “logi-
ca” del programa para pasar
luego aver las primeras pau-
tas que debemos tener en
cuenta a la hora de crear un
documento.
Despues el libro propone u-
na serie de ejercicios para
practicar lo aprendido y pa-
sar entonces al segundo ca-
pitulo.
Trabajar con documentos es
el segundo paso. Se ve es-
pecialmente como se corri-
gen y modifican los docu-
mentos. Aqui encontrare-
mos el camino para llegar al
menu de ayuda y las opera-
ciones habituales con fiche-
ros, es decir, cambiar el
nombre de un fiqhero, co-
piarlo, borrarlo, etcetera.
Otros interesantes temas
tratados son los bloques de
textos, las opciones de im-
presion, nuevas familias de
Pag. 4
comandos y los procedi-
mientos necesarios para
mandar cartas.
El WORDSTAR se puede
considerar como “el proce-
sador de palabras”, pero de
poco servira su potencia si
desconocemos como apro-
vecharlo. (Distribuye: CUS-
PIDE. Edita; PARANINFO)
TALLER
LITERARIO
La Fundacion Talent ha or-
ganizado un "Taller literario
con procesadores de texto”.
La actividad esta destinada a
los docentes primarios y se-
cundarios del area Lengua
que deseen conjugar el uso
informatico de un procesa-
dor de textos con diversas
tecnicas grupales de taller li-
terario.
Lacoordinacicn estara a car-
go de la Prof. Marcela Rue-
duch, y para informes e ins-
cripcion hay que dirigirse a
Chile 1345, ler. piso. Capi-
tal, Tel. 37-0051 al 54, de 11
a 20.30 hs.
LOAD MSX EN
BRASIL
Memos recibido una carta
desde Rio de Janeiro en la
que nos cuentan que alii
tambien nos leen. Asimismo
nos informan que la difusion
de la norma MSX tiene la
dBase II PLUb
misma aceptacion en Brasil
que en nuestro pais. En la
actualidad se llevan vendi-
das 160.000 computadoras
desde su lanzamiento.
Ademas, Sergio Guy Pinhei-
ro Elias -nuestro correspon-
sal- hizo la ppesentacion de
su libro “dBase II Plus MSX
sin misterios”.
CANAL ABIERTO
DE
COMUNICACION
La Interfase RS232C TRX-
710 es un dispositive que
permite dotar a las computa-
doras MSX de un canal de
comunicacion de datos se-
rial.
Este nuevo producto Talent
para sus computadoras
MSX1 y MSX2, que puede
tambidn ser utilizado en
cualquierotra maquina de la
norma MSX, cumple la fun-
cion de un canal de comuni-
cacion serie asincrbnica, se-
gun la norma internacional
RS232C.
La comunicacion serie abre
un nuevo y amplio espectro
de posibilidades de uso para
las computadoras MSX,
pues permite su conexion
con numerosos dispositivos
a los que se accede por me-
dio de este tipo de canal, co-
mo son los graficadores, im-
presoras, modems, progra-
madores de memories
ROM, computadoras, etce-
tera.
Una caracterfstica importan-
te de la interfase TRX-71 0 es
que incorpora software en u-
na memoria ROM de 8 KB, y
asi simplifica notablemente
su uso. Puede ser utilizada
con programas desarrolla-
dos por el usuario o bien con
el programa estandar de e-
mulacion de terminal incor-
porado en su memoria ROM.
Incluye instrucciones expan-
didas del BASIC, que permi-
ten manejar el canal de co-
municacion serie como si
fuera un archivo, es decir
con comandos del tipo “o-
pen”, “input”, "output” y “clo-
se”.
La velocidad de transmision
(bits por segundo) y la es-
tructura de los datos (longi-
tud, cantidad de bits de stop.
paridad) son programables
y, por lo tanto, brindan una
gran flexibilidad de uso.
La diferencia mas notoria
que tiene esta interfase con
el modelo anterior de Talent
(TRX-700) es que es mucho
mas compacto, ya que viene
en un cartucho del mismo
formato que el del de MSX-
Write, por ejemplo. Por otra
parte, no incluye ni el MSX-
Write ni el MSX-Plan, lo que
abarata mucho su costo.
Otra diferencia es que no se
trae el programa de comuni-
caciones desarrollado por
Talent, sino simplemente el
conocido "CALL COM-
TERM” que permite trabajar
emulando una terminal. Pa-
ra enviary recibir archives se
deja librado al usuario la pro-
gramacion (desde ya que es
muy sencilla, porque como
dijimos anteriormente, el ca-
nal de comunicaciones se
trata como un archivo mas).
Sin duda Chance ya ha side consagrado como el juego mds popuioi
entodoelpais.
Pero, detrds de todo gran exito hay una muy buena razon. Por eso detrds
de Chance, usted siempre encontrard a El Cronista Comercial.
Un exito editorial que se escribe con la mds completa informacidn.
Desarrollada a traves de un lenguaje claro y abierto.
Y con la perspectiva econdmica necesaria para comprender mejor
la actualidad.
Hoy, quienes juegan con Chance, saben que la mejor informacidn
no es juego.
El Cronista Comeitiai
Su chance de asociarse al exito.
ASCII CORPORATION
ANUNCIA LA MSX2 Plus
En primicia exclusiva presentamos la nueva version de la norma
MSX, ASCII completo las especificaciones de la MSX2 Plus, un
gran avance en el continue crecimiento y desarrollo del estdndar
MSX, ASCII ya estd proveyendo a los fabricantes el software del
sistema y los nuevos chips.
CUADRO 1
SX2 Plus ofrece
grandes avances
en el estdndar
MSX en la parte de video,
audio y manejo de idiomas
internacionales. Por su-
puesto, estos avances
mantienen total compatibi'
lidad con las computado-
ras MSX1 y MSX2 actua-
les, programas de aplica-
ci6n y perif6ricos tales
como unidades de discos e
impresoras.
Un elemento clave de las
MSX2 Plus es el nuevo
VDP desarrollado por
ASCII, que utilize la misma
tecnica de compresidn de
colores de la serial de
transmisidn de T.V.. Con
esta tecnica, se obtienen
pantallas con calidad casi
natural y se emplea la mis-
ma cantidad de memoria
que en las pantallas de
MSX2.
El estcindar MSX, presen-
tado en junio de 1983, fue adoptado
rapidamente por una gran cantidad de
fabricantes dentro y f uera de Jap6n. Se
desarrollaron muchas versiones inter-
nacionales de la norma, que incluian
sistemas para lenguajes europeos,
^rabe, ruso y coreano. MSX2, presen-
tada en mayo de 1 985, ofrece gr^ficos
y sonido mejorados, y una extensidn
importante del MSX BASIC. Se han
vendido alrededor de 2.9 millones de
computadoras MSX en todo el mundo
(1.8 millones de unidades en Jap6n y
1.1 millones en el resto del mundo).
Los grSficos, sonido y video de MSX se
han empleado en aplicaciones de en-
tretenimiento, pero MSX tambien se
utilize ampliamente en aplicaciones
graficas "serias”. Ya que conforman un
sistema con un amplio rango de perif^-
ricos, las MSX son empleadas paratra-
bajos cientificos e ingenieriles, y para
tareascomercialestradicionalestienen
procesadores de texto, planilla de
c^lculos y base de datos. Los modelos
m^s recientes de la norma se han espe-
cializado en edicidn de video y unida-
des de discos l^ser.
Las especificaciones de la
MSX2 Plus surgen como re-
sultado de una encuesta a
gran escala realizada por
ASCII qntre sus usuarios. De
esta forma, las necesidades
de los usuarios fueron parte
del proceso que Ilev6 a la
creacion del MSX2 Plus, el
mayor avance de la norrna en
tres anos.
PANTALLAS
CASI
NATURALES
La pieza clave del nuevo
MSX2 Plus, como quedd di-
cho, es el VDP V9958, que
provee pantallas de calidad
casi natural. El V9958 se
basa en el VDP anteriormen-
te utilizado por la norma
MSX2. Pero el agregado del
sistema de pantallas tipo YJK
Natural Picture Display y la
capacidad de desplazamiento horizon-
PRODUCTOS MSX
PRODUCCION DEL MERCADO
(TOTAL DE UNIDADES)
Corea 140.000
Europa 400.000
Medio Orlente 140.000
America del Sur 160.000
Pag. 6
tal pixel por pixel hacen al MSX2 Plus
competitivo frente a sistemas gr^ficos
especializados mucho m^s costosos.
El nuevo sistema YJK de compresion
de colores permite llevar la cantidad de
colores disponibles de 256 a 19268.
Esta nueva capacidad no consume
m^s memoria ni miis tiempo de proce-
so. Con YJK, las escenas natu rales
tales como retratos, paisajes, animales
y objetos parecen tomar vida en la
pantalla.
Este sistema de compactacion se basa
en el hecho de que el ojo humano es
mucho mas sensible al brillo que al
color. Al almacenar mas datos sobre el
brillo de una imagen en lugar del color,
con la misma cantidad de datos de
pantalla se pueden seleccionar hasta
75 veces m^s colores que con MSX2.
El scroll horizontal de pantalla permite
un desplazam lento suave de la imagen
que, agregado al scroll vertical disponi-
ble en la MSX2, hace posible desarro-
llar nuevos juegos y sistemas de video
con animacibn de titulos, ideal para los
“video-makers” hogarenos.
SINTETIZADOR FM
MULTICANAL
Complementando el chip de sonido
utiiizado actualmente por la norma, el
AY3-891 0 PSG (Generador de sonido
programable) incorpora la opcion en
MSX2 Plus del chip de sonido YM241 3
generador de tonos FM de Yamaha.
Con este chip (o cxsmpatibles) es posi-
ble generar sonidos de instrumentos
electrbnicos o acusticos de alta cali-
dad.
El generador de tonos FM es una de las
caracterfsticas mas solicitadas por los
usuarios MSX. Permitirb desarrollar
software de gran refinamiento en el
brea recreativa, e incluso servira a los
usuarios amantes de la musica. El
nuevo generador de tonos FM se deno-
mina MSX Music, e incluye el mismo
generador y software del sistema que io
soporta.
Este generador puede manejar hasta
nueve canales individuales con un ran-
go de ocho octavas o seis canales indi-
viduales de ocho octavas, mas cinco
canales de ritmo. A estas funciones se
puede acceder a traves del MSX BASIC
o Assembler, mediante el software del
sistema.
IMAGENES, SONIDO Y
MANE JO DE CARACTE-
RES SOPORTADOS
CON EL MSX BASIC 3.0
Las nuevas caracterfsticas del MSX2
Plus pueden manejarse a traves del
MSX-BASIC versibn 3.0, la versibn
extendida del MSX BASIC 2.1. Esta
nueva versibn permite un acceso facil a
las nuevas caracterfsticas para los
usuarios y programadores.
TABLA COMPARATIVA DE LAS VERSIONES MSX
ITEM
MSX
MSX2
MSX2 +
VELOCIDAD DEL CLOCK
DEL CPU
Z80/3.58Mhz
Z80/3.58Mhz
Z80/3.58Mhz
MAXIMA CAPACIDAD DE
MEMORIA
TIPICA / (ESPECIFICACION)
16Kb
(8Kb-64Kb)
64Kb
(64Kb-4Mb)
64Kb
(64Kb-4Mb)
MEMORIA DEL PROGRAMA
DEL SISTEMA
32Kb(MSX BASIC Ver.1.0)
48Kb(MSX BASIC VER.2.0.)
96Kb(MSX BASIC VER.3.0.)
MEMORIA DEL PROGRAMA
DOS
16Kb(Do»1)
16Kb(Dos1)
48Kb(DOS2)
16Kb(Dos1)
48Kb(DOS2)
MEMORIA DE VIDEO
16Kb
128Kb
128Kb
MAX RES (H X V)
256 X 192
512x424
512x424
MAX COLORES
16 COLORES
256 COLORES
19268 COLORES
SCROLL VERTICAL
NO
SI
SI
SCROLL HORIZONTAL
NO
NO
SI
AUDIO
PSG
PSG
MSX-AUDIO (OPCIONAL)
PSG
MSX-AUDIO (OPCIONAL)
MSX-MUSIC (OPCIONAL)
RS-232
OPCIONAL
OPCIONAL
OPCIONAL
MODEM (300/1200 BPS)
OPCIONAL
OPCIONAL
OPCIONAL
P4g.7
:anza msx en todo
.MUNDO
'erherichy gerente de la Division Internacional de ASCII
tion, creadora de la norma MSX anuncio en la Argentina
miento de los nuevos productos de hard y de software.
anscurso de una charla
al entre El Dr. Berberich
derico Zilic, Director de
pudo conocer el lanza-
uevos productos de AS-
MSX2 Plus, MSX-DOS2
^ otras novedades.
orto los siguientes con-
a tarea principal desa*
>SCII?
\a corporacibn dedicada
ente al desarrollo y edi-
are y hardware para el
i6s y literatura sobre el
10 es la creadora de la
sen es el mayor produc-
) de todo Jap6n.
rge la norma MSX?
ISX y sobre todo el MSX-
a creacibn conjunta de
sen. Nos basamos en
tentes de Microsoft para
pero nofue una mera co-
stas extensiones son la
la norma. Esta tarea fue
para la epoca en que se
nosotros bramos Micro-
nuestro nombre era AS-
'ar East. La idea general
3 de “Kay” Nishi, pero los
en la creacibn de la nor-
3 la BIOS y el MSX-BA-
ey” Suzuki y “Rick” Ya-
so decimos que MSX es
uestro, pues realmente
desarrollb la norma.
ASIC es una extensibn
ealmente pienso que se
Microsoft BASie de la
00 mbs que en el de Ap-
desarrollando en Europa la MSX3
con grandes capacidades de grbfi-
cos y procesamlento. ^Es cierto?
V ^
R.: No tengo noticias de ello y, como
creadores de la norma, si existiera lo
sabriamos. La versibn que actualmen-
te esta vigente es la MSX2 Plus, que es
la que motiva, entre otras cosas, la gi-
ra que estoy realizando. No creemos
necesaria una MSX totalmente nueva,
sino que la norma vaya ampliandose
progresivamente. Las nuevas amplia-
ciones Iran apareciendo en el transcur-
so del aho prbximo. No creemos que
sea necesario ircreando MSX3, MSX4,
etcetera.
Nuestra idea es ir creando MSXs para
distintas aplicaciones. Porejempio, es-
tamos pensando en la MSXe, una ver-
sibn muy econbmica dedicada a la edu-
cacibn con la posibilidad de trabajo en
red. Otra posibilidad es la MSX Turbo,
una computadora de muy alta veloci-
confundir con la MSX2 Turbo de T alent,
que debe su nombre al compilador BA-
SIC Turbo).
P.: Se decia que la MSXS iba a incor-
porar el Z800 de alta velocidad de
procesamlento. ^Es el que se inclui-
rla con la MSX Turbo?
R.: No. Estamos pensando incluir un
CPU de mayor velocidad de procesa-
miento. Hay que tener presente que el
CPU se utilize sblo para el sistema ope-
rative y algunas operaciones. Los com-
ponentes principales de la MSX son el
chip de video y el chip de audio. Nues-
tra idea es utilizer la arquitectura de co-
procesador, utilizer muchos procesa-
dores diferentes donde cada uno tiene
su funcibn especifica. Las computado-
ras como la Amiga y las IBM PC usan
un solo procesador para todo. Por su-
puesto, ellos tambien usan algunos
chips especializados pero pensamos
que utilizando esta arquitectura obten-
dremos una maquina mbs potente a un
precio menor con un CPU muy simple,
sblo para el sistema operative que es
para un solo usuario y una sola tarea.
No tratamos de imitar la IBM PC pues
las IBM PCtratan de imitar los mainfra-
mes. Nosotros queremos crear una
computadora para una persona. Una
computadora verdaderamente perso-
nal.
P.r^Cublesla mayor dlferenclaexls-
tente entre la MSX2 y la MSX2 Plus?
R.: La nueva MSX2 Plus Incorpora un
chip de video novedoso: el V9958 de
Yamaha. Mientras que el V9938 de la
MSX2 permitfa visualizar hasta 256 co-
lores simultbneos en pantalla, este
nuevo chip permite visualizar hasta
1 9268 colores, sin requerir mbs memo-
ria. Esto es posible gracias al metodo
Esta nueva versi6n de la norma permi-
ts obtener imagenes mils vividas que la
anterior. Ademds, se mejora el chip de
audio de la norma, incluyendo laopcidn
del generador de sonido FM, que es el
que se utiliza en la plaqueta del MSX
Audio. Todas estas nuevas capacida-
des de la norma podran manejarse a
traves de la n ueva version del MSX-BA-
SIC;la3.0.
P.: ^Cu^ndo estarii disponible.esta
nueva versidn de la norma?
R.: El chip de video ya esta disponible
y el MSX-BASIC 3.0.se esta terminan-
do. Se calcula que para fin de aho po-
drii ser provisto a los OEMs. (N. de R.:
Original Equipment Manufacturers -
Fabricantes de equipos originales)
P.: en cuanto al MSX-DOS2?
R.: Es la nueva versidn del MSXDOS
para MSX2 que es compatible en fun-
cionamiento con el MSDOS versidn 2.0
en adelante. Admits subdirectorios, in-
cluye un RAM Disk y varias funciones
mas. Esta nueva version viene en car-
tucho o bien se puede incluir en las uni-
dades de discos para que funcionen
con la nueva MSXDOS.
Ya se ha implementado un hard disk
para MSX-DOS2 que funciona muy efi-
cientemente.
CLONES Y MSX
P.: La competencia creada por los
clones del PC es realmente fuerte.
^Cree Ud. que la norma MSX podrd
sobrellevarla?
R.: El concepto fundamental de la nor-
ma es que estas computadoras son
verdaderamente personales, para el
hogar. Las IBM PC son computadoras
ideales para el procesamiento num^ri-
co, pues tratan de emular a los mainfra-
mes, pero los gr^ficos no son su punto
fuerte. Asimismo, como dije anterior-
mente, no creemos que el CPU deba
realizar todas las tareas.
Al crear la arquitectura modular de
MSX pensamos que pudiendo utilizer
un CPU sencillo abaratamos los costos
de las computadoras de la norma y ob-
tenemos grandes ventajas frente a la
competencia en loquehace al procesa-
miento de imagenes. Cuando decimos
procesamiento de imiigenes nos referi-
mos a video y audio. Creemos que la
mejor propuesta de venta que tiene
MSX es que, cuando el potencial com-
prador de una miiquina ve una demos-
tracidn de graficos y sonido de una de
nuestras computadoras, seguramente
se verS impulsado a comprarla, pues le
brinda posibilidades muy amplias en
este campo. Si bien es cierto que las
MSX tambi4n pueden realizar proce-
sos numericos, no creemos que sea
necesario fortalecer la norma en este
aspecto. Cuando se trabaja con una
MSX, dejamos que el CPU se encargue
de atender al usuario, mientras que los
mbdulos especializados realizan las
distintas tareas. Por eso, cuando pen-
samos en la MSX Turbo creemos posi-
ble incorporar un coprocesador que re-
alice la tarea pesada, mientras que el
Z80 dialoga tranquilamente con el u-
suario. Tenemos prototiposfuncionan-
do a velocidades de PC AT perfecta-
mente.
Nos parece un despropbsito que en sis-
temas operatives como el OS/2, el 40 %
de la memoria y el 1 00 % de la capaci-
dad operativa del CPU est4n dedica-
dos exclusivamente al OS/2. Nuestros
productos llegan m^s al usuario no in-
formditico. Con MSX es posible lograr
resultados sorprendentes con pocos
conocimientos sobre el tern a, ya que su
estructura esta pensada como “facil de
usar”. Una de las fallas que vemos en
las Amiga es la dificultad que presenta
esta computadora en su utilizacibn.
Trabajarcon MSX es mas sencillo, efi-
ciente y facil. Son las verdaderas com-
putadoras personales.
LA REALIDAD DE LA
NORMA
P.: cEs cierto que la norma no ha te-
nido una ampiia difusibn a nivel
mundlal?
R.: Se han vendido alrededor de 2.9 mi-
llones de computadoras MSX(1 y2) en
todo el mundo (1.8 millones de unida-
des en Japon y 1 .1 millones en el resto
del mundo). Esta popularidad se debe
fundamentalmente a que es una com-
putadora muy flexible y de bajo costo.
Existe un amplio rango de perifericos
que permiten realizar tareas diversas,
desde aplicaciones graficas serias has-
ta juegos, y desde trabajos cientifico-
ingenieriles hasta trabajos de oficina
estandar como procesador de texto,
planilia de cbiculo y base de datos.
P.: Cambiando da tema, ^por qub el
compilador MSX Turbo no es total-
mente compatible con el MSX-BA-
SIC, es decir, algunas instrucclones
no estbn contempladas en el compi-
lador?
R.: Este compilador es de “una pasa-
da”, es decir, que no genera archives
objeto. La mayoria de las instrucciones
no incluidas en el compilador son de 1/
O, que no pueden ser aceleradas. Por
eso elegimos que instrucciones pue-
den ser aceleradas, tomamos las de vi-
deo y algunas de matematicas; el res-
to no existe razbn para acelerarlas.
P. : Tenemos a la venta el MSX-Write
para MSXI y nos preguntbbamos si
existe alguna versibn para MSX2,
que utilice las 80 columnas y todas
las capacidades de la MSX2.
R.: Por el momento no esta contempla-
do crear una versibn internacional para
MSX2. Existe el MSX-Write2 para el
mercado japonbs pero no funcionaria
bien para idiomas internacionales por
su estructura (para kanji) . De todos
modos existen otros procesadores de
texto para MSX, como el WordStar, que
funcionan muy bien y permiten trabajar
en 80 columnas.
P.: Si un productor de software de o-
tro pals se acerca a ASCII con algun
producto interesante, ^puede llegar
a publicario a travbs de la empresa?
R.; Es una de las cosas que tratamos
con el Sr. Zilic. Si encontramos algun
software de interes para el mercado ja-
pones, seguramente querriamos verb
para estudiar la posibilidad de lanzarlo
en Japbn. Asimismo estamos a la bus-
queda de un representante en el exte-
rior para que publique nuestro software
y no esfbcil. Algunos productores estan
realizando muy buenos programas pa-
ra la norma, muchos del tipo educative.
El Dr. Frank Berberich, luego de filmar
las instalaciones de la calle Chile, se
llevb una grata impresibn de la tarea de
desarrollo para la norma, y prometib
dejar un canal de comunicaciones que
permitira estaraldiacon las novedades
de la norma y realizar proyectos con-
juntos.
Seguramente, el lector ansioso se es-
tara preguntando cuando tendremos
en el mercado la MSX2 Plus, y el MSX-
DOS2. Bueno, por el momento dire-
mos que esta en qstudio la factibilidad
de lanzar la MSX2 Plus en el mercado
nacional y chileno, segun sean las ca-
racteristicas requeridas para ello. Es
decir, no es como para ir corriendo a
nuestro distribuidor amigo a solicitar u-
na MSX2 Plus, pero...
Hugo Daniel Caro
Roberto Nbstor Tokuda
Pag. 9
DIRSORT
Tipo: Utilitario
Autor: Carlos Eduardo Francheri
MENCION DEL 4*“ CONCURSO DE PROGRAMAS
el disco cuyo directorio se desea orde-
nar (A o B), al criterio primario de orde-
namiento (por nombres, extensiones o
tamanos) y, opcionalmente, al criterio
secundario. En ambos casos deber^
optarse por el modo de orden: ascen-
ste programa tiene por objeto
ordenar de manera perma-
nente el directorio de un disco
atendiendo a distintos criterios: por or-
den alfab6tico de NOMBRES, EXTEN-
SIONES o TAMANOS (longitudes en
bytes).
El ordenamiento puede reaiizarse, a-
demiis, de manera ascendente o des-
cendente por cualquiera de los crite-
rios mencionados.
Permits usar simult^meamente dos cri-
terios de orden diferentes de manera
opcional; lo cual es mis que suficiente
para conocer de un simple vistazo los
programas que contiene el disco.
En caso de optar el usuario por dos cri-
terios en forma conjunta, se utilizan
dos algoritmos de ordenacidn diferen-
tes.
El algoritmo utilizado para el CRITE-
RIO PRIMARIO (ascendente o des-
cendente) consists en obtener el ME-
NOR (para orden ascendente) o MA-
YOR valor (para orden descendente)
de unatablao arreglo mediants un bu-
cle; el algoritmo realiza una permuta-
ci6n en la misma y coloca al mayor (o
menor) elemento encontrado en la po-
sicidn o registro “R” como primer ele-
mento de latabla y el primer elemento
en la posicidn o registro “R”. Luego se
realiza una nueva busqueda del mayor
(o menor) pero a partir del registro nO-
mero 2; se repite el prqceso de permu-
tacidn hasta que la lista est4 ordenada.
El m^todo utilizado para el CRITERIO
SECUNDARIO, en caso de ser elegi-
do, es el conocido como de la BURBU-
JA debido a que los elementos de ma-
yor (o menor) valor "ascienden” a los
primeros registros de una tabla de “ma-
nera similar” a las burbujas en un liqui-
ds. Fue elegido porque es bastante r^-
pido para una lista casi ordenada.
Pag. 10
El tiempo de ejecucidn del programa
variard Idgicamente con el nOmero de
archives presentes en el disco (I4ase
entradas de directorio, pues tambi^n
ordena los archives borrados e invisi-
bles como se verd luego) y si es s6lo u-
no el criterio elegido para el ordena-
miento o dos.
Para treinta y dos (32) entradas de di-
rectorio, el tiempo total empleado es de
un minute diez segundos, aproximada-
mente, para un criterio de orden; co-
rresponde el mayor tiempo a tos modu-
les “LECTURA DE DIRECTORIO” y
“GRABACION DE DIRECTORIO OR-
DENADO” (ver diagrama de bloques
adjunto).
USO DEL PROGRAMA
Es rnuy sencillo p>ara el operador utilizar
este programa pues bs menues son de
tipo de emulaciOn de ventanas y su ma-
nejo se realiza con las teclas del cursor
y la barra espaciadora. El usuario debe
responder al drive donde se encuentra
dente o descendente.
El programa, ademOs,:
1 - mantiene al operador informado so-
bre la tarea que se encuentra realizan-
do,
2- reconoce distintos formates: doble
cara (DS) o simple cara (SS) y actua en
consecuencia, y
3- ordena los archives borrados por lo
comandos DEL-ERASE. Estos se in-
cluyen para prever una posible recupe-
raciOn mediante algOn utilitario capaz
de recobrarficheros borrados por error.
Debido a la compatibilidad en el forma-
te de grabacibn entre MSX-DOS y el
MS-DOS de las computadoras PC:
4- reconce etiqueta de volumen coloca-
da en el disco, si fue formateado con al-
guna versbn igual o superior a la 2.xx
del MS-DOS, y
5- en caso que el disco presentara sub-
directories, bstos se colocan siempre
como las primeras entradas de un di-
rectorio de manera que se agiliza su
busqueda en el mismo.
ESTRUCTURA DEL
PROGRAMA
10: inicializaci6n.
20: Desvfo a presentacibn.
30-150: Eleccibn del drive.
160-500: Eleccibn del criterio de orde-
namiento primario y modo.
510-780: Eleccibn del criterio de orde-
namiento secundario y modo (opcio-
nal).
790-850: Ventana. Informacibn al u-
suario.
860: Direccibn de memoria del buffer
donde se guarda la informacibn de un
sector.
870-1400: Lectura del directorio y car-
ga de datos a matrices.
1410-1610: Ordena por criterio prima-
rio ascendente.
1650-2060: Ordena por criterio secun-
dario ascendente.
2070-2270: Ordena por criterio prima-
rio descendente.
2300-2710: Ordena por criterio secun-
dario descendente.
2720-2960: Si existen subdirectories,
los coloca primero.
2970-3280: Graba directorio ordenado
segbn criterio/s escogido/s.
3290-3390: Opcibn para ordenar otro
disco o reestablecimiento de parbme-
tros iniciales y finalizacibn.
3400-3650: Presentacibn.
3660-3720: Rutina dibujo de ventanas
y cuadros.
3730-3780: Rutina dibujo de disquetes.
3790-3860: Rutina de impresibn de ca-
racteres.
LISTA DE VARIABLES
Presentacibn y ventanas
XI : Posicibn coordenada “x" vbrtice su-
perior izquierdo de ventana.
Y1 : Posicibn coordenada “y” vbrtice su-
perior izquierdo de ventana.
X2: Posicibn coordenada “x” vbrtice in-
ferior derecho de ventana.
Y2: Posicibn coordenada “y” vertice in-
ferior derecho de ventana.
C: Ck>lor relleno de ventana.
Cl : Color del “recuadro”de la ventana.
C3: Color del “cuadro” para eleccibn de
opciones.
V, II , 12, 13: Auxiliares. Flags que indi-
can las caracterlsticas de la ventana.
DX y DY: Coordenadas para el dibujo
de los disquetes.
Procesamiento de los caracteres im-
presos
TE$: Texto que se va a imprimir.
TC$: Carbeter actual impreso.
PX: Coordenada “x” inicio impresibn del
texto.
PY: Coordenada "y” inicio impresibn del
texto.
Selaccibn ds cr Her los y modos de or-
denamlento
CP: Criterio primario.
CP$; Modo para criterio primario.
10 CLEAR 1400 : DEFSNG A-Z
: SCREEN2 : OPEN"GRP: "AS#1*
: WIDTH40 : COLOR 1,4,4 : C
LS
20 GOSUB2790 ' Presentacion
30 ' Ventana ELECCION DRIV
E
40 C-11 : Xl-128 : X2=176 :
Yl-40 : Y2-98 : 11=1 : V=1
: Cl-1 : GOSOB 3000 ' vent
ana DRIVE
50 PX-136 : PY=48 : CT=1 :
TE$="Drive?" : CT=1 : GOSUB
3790 : PX-140 : PY-72 : TE
$="A B" : GOSUB 3790 ' col
oca texto en ventana
60 C3=l : Xl=136 : X2-148 ;
Yl=70 : Y2-80 : 13-1 : GOS
UB3000
70 Y$=INKEY$ : IFY$=""THEN7
0
80 IF Y$=CHR$ (28)THEN 90 EL
SE 100
90 C3-C : 13-1 : GOSUB 3000
; Xl-154 : X2-166 : C3-1 :
13=1 : GOSUB 3000
100 IF Y$=CHR$ (29)THEN 110
ELSE 120
110 C3-C : I3-i : GOSUB 300
0 : GOTO 60
120 IF Y$-CHR$(32) THEN 130
ELSE 70
130 BEEP : BEEP : COLOR 15
; IF Xl-136 THEN DR-1 : PRE
SET (16, 15) : PRINT#1,"A" EL
SE DR-2 : PRESET (240, 15) :
PRINT#1,"B" 'DR-1 drive A.
DR-2 drive B.
140 'Ventanas y SELECCION C
RITERIO PRIMARIO-MODO
150 Xl-136 : X2-240 : Yl-50
: Y2-182 : V-1 : C-1 : Cl-
11 : Il-l : GOSUB 3000
160 PX-151 : PY-58 : CT-2 :
TE$-"CRITERIO Irio." : GOS
UB 3790
170 PX-143 : PY-74 : CT-15
: TE$-"Por nombres" : GOSUB
3790
180 PX-143 : PY-86 : TE$-"P
or extenciones" : GOSUB 379
0
190 PX-143 : PY-98 : TE$="P
or tama$os" : GOSUB 3790
200 Xl-141 : X2-235 : Yl-71
; Y2-82 : 13=1 : C3-15 : G
OSUB3000
210 Y$-INKEY$ : IFY$-""THEN
210
220 IF Y$-CHR$(31) THEN 230
ELSE 240
230 IF YK-83 THEN C3-C : I
3=1 : GOSUB 3000 : Yl-Yl+12
: Y2-Y2+12 : C3-15 : 13=1
: GOSUB 3000
240 IF Y$-CHR$(30) THEN 250
ELSE 260
250 IF Yl>-83 THEN C3-C : I
3-1 : GOSUB 3000 : Yl-Yl-12
: Y2-Y2-12 : C3-15 : 13=1
: GOSUB 3000 : GOTO 210
260 IF Y$=CHR$(32) THEN 270
ELSE 210
270 BEEP : BEEP : IF Yl-71
THEN CP-1 ELSE IF Yl-83 THE
N CP-2 ELSE CP-3 ' Seleccio
n criterio Irio.
280 PX-172 : PY-114 : CT-2
: TE$="M0D0" : GOSUB3790 :
PX-151 : PY-128 : CT-15 : T
E$— "ascendente" : GOSUB 379
0 : PX-151 :,PY-142 ; TE$="
descendente" : GOSUB 3790
290 C3-15 ; Xl-149 : X2-220
: Yl-125 : Y2-136 : 13=1 :
GOSUB3000
300 Y^-INKEY$ : IFY$=""THEN
300
310 IF Y$=CHR$ (3DTHEN 320
ELSE 330
320 C3=C : 13=1 : GOSUB 300
0 : Yl-139 : Y2-150 : C3-15
: 13-1 : GOSUB 3000
Pag. 11
CS: Criterio secundario.
CS$: Modo para criterio secundario.
Lecture del directorlo
DR: Drive.
Dl: Direccion de memoria de comienzo
del buffer donde se almacena la infor-
macion de un sector leido mediante
DSKI$.
XX: Sector actual leido.
PP: Numero de entradas de directorio
encontradas.
Y: Numero de byte (1 1 -31 ) de cada en-
trada de directorio.
FO: Indicador de sector de comienzo
del directorio en funcibn del tipo de for-
mato del disco (doble cara o simple ca-
ra).
CL: Clauster de comienzo de cada en-
trada de directorio. Usada para hacer
mas cortas las busquedas.
CSDI%: Caso disco MS-DOS, contador
de etiqueta de volumen mbs subdirec-
tories en caso que bstos existieran en el
disco.
YSDI%: NOmero de byte (1 1 -1 3) de ca-
da subdirectorio hallado. Usada en un
bucle.
A$: Forma el nombre de cada entrada
de directorio.
Ordenamlento por criterios primario
y secundario. Ascendente y descen-
dente
MA# y MA&: Valores de comparacibn
para ordenamlento porcriterio primario.
RT: Registro donde fue encontrado un
mbximo o un mlnimo para ordenamien-
to descendente o ascendente respecti-
vamente.
B: Flag indicador para ordenamlento
secundario.
Grabacibn del directorio ordenado
SG: Sector actual grabado.
RR: Contador de entradas de directorio
para grabacibn.
Matrices
NO$(112): Almacena los nombres de
cada entrada de directorio.
BY%(112,21): Almacena los bytes li-
st de cada entrada.
LO&(112): Almacena los tamafios (en
bytes) de cada entrada.
SDI$(23): Si el disco presenta subdi-
rectorios, sus nombres aqui se almace-
nan.
BSDI%(23,21): Condicibn Idem ante-
rior almacena los bytes 11-31 de cada
uno.
330 IF Y$=CHR$ (30)THEN 340
ELSE 350
340 C3-C : 13-1 : GOSUB 300
0 : GOTO 290
350 IF Y$-CHR${32) THEN 360
ELSE 300
360 BEEP ; BEEP : IF Yl-125
THEN CP$-"A" ELSE CP$-"D"
'Selecion rtiodo ordenam. par
a Crit. Irio.
370 PX-148 : PY-156 : CT-2
: TE$-"CRITERIO 2rio?" : GO
SUB 3790
380 PX-164 : PY-170 : CT-15
: TE$="si no" : GOSUB 37
90
390 03=15 : Xl=162 : X2-177
; Yl-167 : Y2=178 : 13=1 :
GOSUB3000
400 Y$=INKEY$ : IFY$=""THEN
400
410 IF Y$=CHR$(28) THEN 420
ELSE 430
420 C3-C : 13=1 : GOSUB 300
0 : Xl-192 : X2-207 : 03=15
: 13=1 ; GOSUB 3000
430 IF Y$=OHR$ (29)THEN 440
ELSE 450
440 03=0 : 13=1 : GOSUB 300
0 : GOTO 390
450 IF Y$=OHR$.(32) THEN 4 60
ELSE 400
460 BEEP : BEEP : IF Xl=162
THEN 470 ELSE OS=0 : GOTO
730
470 ' Vent ana y ELEOOION OR
ITERIO 2rio-MODO
480 Xl=64 : X2=167 : Yl-64
: Y2-176 ; V-1 ; 11=1 : 0=1
4 : 01=4 : GOSUB 3000
490 PX-74 : PY=72 : OT-1 :
TE$="ORITERIO 2rio." : GOSU
B 3790
500 PX=71 : PY=88 : OT=4
510 IF OP=l THEN TE$="Por e
xtenciones" ; GOSUB3790 : P
X-71 : PY-100 : TE$-"Por ta
ma$os" : GOSUB3790
520 IF OP-2 THEN TE$="Por n
ombres" : GOSUB3790 : PX=71
: PY=100 : TE$-"Por tama$o
s" : GOSUB3790
530 IF OP=3 THEN TE$="Por n
ombres" : GOSUB3790 : PX=71
: PY=100 : TE$="Por extenc
iones" : GOSUB3790
540 03=4 : Xl=69 : X2-162 :
Yl=85 : Y2=97 : 13=1 : GOS
UB3000
550 Y$=INKEY$ ; IFY$-""THEN
550
560 IF Y$-OHR$ (31)THEN 570
ELSE 580
570 03=0 : 13=1 : GOSUB 300
0 : Yl=97 : Y2=109 : 03-4 :
13-1 : GOSUB 3000
580 IF Y$=OHR$ (30)THEN 590
ELSE 600
590 03-0 : 13-1 : GOSUB 300
0 : GOTO 540
600 IF Y$-OHR$(32) THEN 610
ELSE 550
610 BEEP : BEEP : IF Yl-85
AND OP=l THEN 0S=2 ELSE IF
Yl-97 AND OP-1 THEN OS-3
620 IF Yl-85 AND OP=2 THEN
OS-1 ELSE IF Yl-97 AND OP-2
THEN OS-3
630 IF Yl-85 AND OP-3 THEN
OS=l ELSE IF Yl-97 AND OP=3
THEN OS-2
640 PX-95 : PY-125 : OT-1 :
TE$-"MODO" : GOSUB3790 : P
X-71 : PY-141 : OT=4 : TE$=
"ascendente" : GOSUB 3790 ;
PX-71 : PY-153 : TE$="desc
endente" : GOSUB 3790
650 03-4 : Xl-69 : X2-140 :
Yl-138 : Y2-150 : 13=1 : G
OSUB30Q0
660 Y$=INKEY$ : IFY$=""THEN
660
670 IF Y$=OHR$ (31)THEtf 680
ELSE 690
680 03-0 : 13=1 : GOSUB 300
0 : Yl-150 : Y2-162 : 03=4
: I3=i : GOSUB 3000
690 IF Y$=OHR$ (30)THEN 700
ELSE 710
700 03-0 : 13-1 : GOSUB 3000
: GOTO 650
710 IF Y$=OHR$(32) THEN 720
ELSE 660
720 BEEP : BEEP : IF Yl-138
THEN OS$="A" ELSE OS$-"D"
'Selecion modo ordenam. par
a Crit. 2rio.
730 ' VENTANA. Informacion
Usuario
Pag. 12
740 Xl=«8 : X2«143 : Yl=35 :
Y2=180 : C=6 : Cl*l : V-1
: 11=1 : GOSUB 3660
750 PX=16 : PY=48 : CT=1 :
TE$="INFORMACION PROCESO" :
GOSUB 3790
760 DI=PEEK(&HF351)+256*PEE
K(&HF352) ' Buffer de comie
nzo
770 DIM BY%(112,21) ,NO$(112
) ,LO! (112) ,SDI$(23) ,BSDI%(2
3,21)
780 ' LECTURA DEL DIRECT
ORIO
790 ' Esta rutina es la enc
argada de leer la informaci
on de un SECTOR (XX) del Dir
ectorio almacenada a partir
de la direccion de comienz
o del Buffer que se encuent
ra en DI.
800 ' Variables: XX= Sector
leido, PP= Nro. de archive
s hallados (incluidos los bo
rrados) , Y= Nro. de Byte (11
-31) de cada archive hallad
o
810 A$=DSKI$ (DR, 1) : IF PEE
K(DI)=&HFD THEN F0=4 ELSE F
0=2 ' Averigua tipo de form
ato del disco
820 PX=16 : PY=64 : CT=15 :
IF FO=4 THEN TE$="Disco do
ble Cara(DS)" : GOSUB 3790
ELSE TE$»"Disco simple Cara
(SS)" : GOSUB 3790
830 XX=F0 : PP=0 : Y=1 : YS
DI%*1
840 XX=XXtl
850 PX=16 : PY=74 : TE$="Le
yendo directorio" : GOSUB 3
790
860 SE$=DSKI$(DR,XX) ' Lect
ura del sector XX
870 FOR I=DI TO DI+480 STEP
32
880 CL=PEEK(I+26)+256*PEEK(
1+27) ' Cluster de comienzo
del archive Nro. PP
890 IF PEEK(I+11)=&H28 OR P
EEK(I+11)=&H10 THEN 900 ELS
E 1030 ' pregunta si se tra
ta de etiqueta de volumen o
Subdirectorio
900 A$=""
910 FOR J=0TO10
920 A$=A$+CHR$ (PEEK (I+J) )
930 NEXT
940 CSDI%=CSDI%+1
950 SDI$ (CSDI%)=A$ ' almace
na el nombre de la etiqueta
de volumen o del subdirect
orio
960 FOR K=ll TO 31
970 BSDI% (CSDI%, YSDI%)-PEEK
(I+K) ' almacena los Bytes
11 a 31 del subdirectorio C
SDI%
980 YSDI%=YSDI%+1
990 NEXT
1000 YSDI%=1
1010 NEXT
1020 GOTO 840
1030 IF CL=0 THEN 1180 ' fi
naliza si no hay mas archiv
os
1040 A$=""
1050 FORJ=0TO10
1060 A$=A$+CHR$ (PEEK (I+J) )
1070 NEXT
1080 PP»PP+1
1090 NO$(PP)=A$ ' almacena
el nombre del archive PP
1100 LO! (PP) = (PEEK (1+28) +25
6*PEEK (1+29) ) +256* (PEEK (1+3
0)+256*PEEK(I+31) ) ' almace
na la longitud en Bytes del
archive PP
1110 FOR K=ll TO 31
1120 BY% (PP,Y)=PEEK(I+K) '
almacena los Bytes 11 a 31
del archive PP
1130 Y=Y+1
1140 NEXT
1150 Y=1
1160 NEXT
1170 GOTO 840
1180 PX=16 : PY=84 : TE$="0
rdenando por" : GOSUB3790 :
PX=16 : PY=92 : TE$="crite
rio Irio..." : GOSUB 3790
1190 IF CP$="A" THEN 1200 E
LSE 1720 ' Averigua si el C
riterio Irio. es ASCENDENTE
0 DESCENDENTE
1200 '
1210 ' ORDENACION POR CRIT
ERIO Irio.
ASCENDENTE
1220 ' Ordena las matrices
NO$, BY% y LO! de acuerdo a
1 criterio Irio. ascendente
elegido
1230 ' MA!= valores de comp
aracion para ordenamiento
1240 RT=0 : M=1
1250 IF CP=1 OR CP=2 THEN M
A$=CHR$ (255) ELSE MAI =370000
f
1260 FOR X=M TO PP
1270 IF CP=1 THEN IF LEFT$ (
NO$(X) ,8)<MA$ THEN MA$=LEFT
$(N0$(X),8) : RT=X : NEXT E
LSE NEXT ELSE 1280 ' Criter
io orden. por nombres
1280 IF CP=2 THEN IF RIGHT$
(NO$(X) ,3)<MA$ THEN MA$=RIG
HT$ (NO$ (X) , 3) : RT=X : NEXT
ELSE NEXT ELSE 1290 ' Crit
erio orden por extenciones
1290 IF CP=3 THEN IF L0!(X)
<MA! THEN MA!=L0! (X) : RT=X
: NEXT ELSE NEXT ' Criteri
o orden por tama$o
1300 SWAP N0$(RT) ,NO$(M)
1310 SWAP LO! (RT) ,L0! (M)
1320 FOR Y=1 TO 21
1330 SWAP BY%(RT,Y) ,BY%(M,Y
)
1340 NEXT
1350 M-M+1
1360 IF M>PP THEN 1370 ELSE
1250
1370 IF CSOO THEN 1380 ELS
E 2240* Si se eligio criter
io 2rio. repite ordenamient
o
1380 PX=16 : PY=102 : TE$="
Ordenando por" : GOSUB3790
: PX=16 : PY=110 : TE$="cri
terio 2rio..." : GOSUB 3790
1390 IF CS$="A" THEN 1400 E
LSE 1910 ' Averigua mode de
ordenamiento 2rio. elegido
1400 ' ORDENAMIENTO POR CR
ITERIO 2rio. ASCENDE
NTE (metodo de la burbuja)
1410 ON CP GOTO 1420,1520,1
620 ' Bifurca a rutina enca
rgada de ordenamiento 2 rio
. ascendente en funcion del
Criterio Irio. elegido
1420 ' Caso Criterio Irio:
Por Nombres
1430 B=0
1440 FOR X=1 TO PP-1
1450 IF CS=2 THEN IF LEFT$ (
N0$ (X+1) , 8) =LEFT$ (NO$ (X) , 8)
AUD RIGHT$(NO$(X+l) ,3)<RIG
HT$(NO$(X),3) THEN SWAP N0$
(X+1),N0$(X) : B=1 : RT=X E
LSE 1500 ELSE 1460
1460 IF CS=3 THEN IF LEFT$ (
NO$ (X+1) , 8) =LEFT$ (NO$ (X) , 8)
AND LO! (X+l)<LO! (X) THEN S
WAP NO$ (X+1) ,NO$ (X) : SWAP LO
! (X+1) ,LO! (X) : B=1 : RT=X
ELSE 1500
1470 FOR Y=1 TO 21
1480 SWAP BY%(RT+1,Y) ,BY%(R
T,Y)
1490 NEXT
1500 NEXT
3^510 IF B=1 THEN 1430 ELSE
2230
1520 ' Caso Criterio Irio:
Por Extenciones
Pag. 13
1530 B=0
1540 FOR X=1 TO PP-1
1550 IF CS=1 THEN IF RIGHT$
(NO$ (X+1 ) , 3) =RIGHT$ (NO$ (X) ,
3) AND LEFT$ (NO$ (X+1 ) , 8) <LE
FT$(NO$(X) ,8) THEN SWAP NO$
(X+l),NO$(X) : B»1 : RT=X E
LSE 1600 ELSE 1560
1560 IF CS=3 THEN IF RIGHT$
(NO$ (X+1 ) , 3) -RIGHT$ (NO$ (X) ,
3) AND LO! (X+l)<LO! (X) THEN
SWAP NO$ (X+1) ,NO$ (X) : SWA
P LO! (X+1) ,LO! (X) : B=1 : R
T=X ELSE 1600
1570 FOR Y-1 TO 21
1580 SWAP BY% (RT+1,Y) ,BY% (R
T,Y)
1590 NEXT
1600 NEXT
1610 IF B-1 THEN 1530 ELSE
2230
1620 ' Caso Criterio Irio:
Por Tama$os
1630 B=0
1640 FOR X-1 TO PP-1
1650 IF CS-1 THEN IF LO! (X)
=LO! (X+1) AND RIGHT$ (NO$ (X+
1) ,3)<RIGHT$ (NO$ (X) ,3) THEN
SWAP NO$ (X+1) ,NO$(X) : B=1
: RT-X ELSE 1700 ELSE 1660
1660 IF CS-2 THEN IF LO! (X+
l)-LO!(X) AND LEFT$ (NO$ (X+1
) , 8) <LEFT$ (NO$ (X) , 8) THEN S
WAP NO$(X+l) ,NO$(X) ; B=1 :
RT=X ELSE 1700
1670 FOR Y=1 TO 21
1680 SWAP BY% (RT+1,Y) ,BY% (R
T,Y)
1690 NEXT
1700 NEXT
1710 IF B=1 THEN 1630 ELSE
2240
1720 ' ORDENACION POR CRIT
ERIO Irio.
DESCENDENTE
1730 ' Ordena las matrices
NO$, BY% y LO! de acuerdo a
1 criterio Irio. descendent
e elegido
1740 ' Variables: OR— crite
rio de orden., MA$ y MA!- v
alores de comparacion para
ordenamiento
1750 RT=0 : M=1
1760 IF CP-1 OR CP-2 THEN M
A$-CHR$ (l)ELSE MA!— 1
1770 FOR X-M TO PP
1780 IF CP-1 THEN IF LEFT$ (
NO$ (X) , 8) >MA$ THEN MA$=LEFT
$(NO$(X),8) : RT-X : NEXT E
LSE NEXT ELSE 1790 ' Criter
io orden . por nombres
1790 IF CP-2 THEN IF RIGHT$
(NO$ (X) , 3) >MA$ THEN MA$=RIG
HT$(NO$(X) ,3) : RT-X : NEXT
ELSE NEXT ELSE 1800 ' Crit
erio orden por extenciones
1800 IF CP-3 THEN IF LO! (X)
>MA! THEN MA!-LO! (X) : RT-X
: NEXT ELSE NEXT ' Criteri
o orden por tama$o
1810 SWAP NO$ (RT) , NO$ (M)
1820 SWAP LO! (RT) ,LO! (M)
1830 FOR Y-1 TO 21
1840 SWAP BY%(RT,Y) ,BY%(M,Y
)
1850 NEXT
1860 M-M+1
1870 IF M>PP THEN 1880 ELSE
1760
1880 IF CSOO THEN 1890 ELS
E 2240' Si se eligio criter
io 2rio. repite ordenamient
o
1890 PX-16 ; PY-102 : TE$-"
Ordenando por" : GOSUB3790
: PX-16 : PY-110 ; TE$="cri
terio 2rio..." : GOSUB 3790
1900 GOTO 1390
1910 ' ORDENAMIENTO POR CR
ITERIO 2 rio. DESCENDE
NTE (metodo de la burbuja)
1920 ON CP GOTO 1930,2030,2
130 ' Bifurca a rutina enca
rgada de ordenamiento 2 rio
. ascendente en funcion del
Criterio Irio. elegido
1930 ' Caso Criterio Irio:
Por Nombres
1940 B-0
1950 FOR X-1 TO PP-1
1960 IF CS-2 THEN IF LEFT$
(NO$ (X+1) , 8) =LEFT$ (NO$ (X) , 8
) AND RIGHT$ (NO$ (X+1 ) , 3) >RI
GHT$ (NO$ (X) , 3) THEN SWAP NO
$ (X+1) ,NO$ (X) : B-1 : RT-X
ELSE 2010 ELSE 1970
1970 IF CS-3 THEN IF LEFT$ (
NO$(X+l) ,8)-LEFT$(NO$(X) ,8)
AND LO! (X+l)>LO! (X) THEN S
WAP NO$ (X+1) ,NO$ (X) : SWAP
LO! (X+1) ,LO! (X) : B-1 : RT-
X ELSE 2010
1980 FOR Y-1 TO 21
1990 SWAP BY% (RT+1,Y) ,BY% (R
T,Y)
2000 NEXT
2010 NEXT
2020 IF B-1 THEN 1940 ELSE
2230
2030 ' Caso Criterio Irio:
Por Extenciones
2040 B-0
2050 FOR X-1 TO PP-1
2060 IF CS-1 THEN IF RIGHT$
(N0$ (X+1 ) ,3) -RIGHT$ (NO$ (X) ,
3) AND LEFT$(NO$(X+l) ,8)>LE
FT$ (N0$ (X) , 8) THEN SWAP NO$
(X+l),NO$(X) : B-1 : RT-X E
LSE 2110 ELSE 2070
2070 IF CS-3 THEN IF RIGHT$
(NO$ (X+1) , 3) -RIGHT$ (NO$ (X) ,
3) AND LO! (X+l)>LO! (X) THEN
SWAP NO$(X+l) ,NO$(X) : SWA
P LO! (X+1) ,LO! (X) : B-1 : R
T-X ELSE 2110
2080 FOR Y-1 TO 21
2090 SWAP BY% (RT+1,Y) ,BY% (R
T,Y)
2100 NEXT
2110 NEXT
2120 IF B-1 THEN 2040 ELSE
2230
2130 ' Caso Criterio Irio:
Por Tama$os
2140 B-0
2150 FOR X-1 TO PP-1
2160 IF CS-1 THEN IF LO! (X)
-LO! (X+1) AND RIGHT$(NO$(X+
1),3)>RIGHT$(N0$(X) ,3) THEN
SWAP NO$(X+l) ,NO$ (X) : B-1
: RT-X ELSE 2210 ELSE 2170
2170 IF CS-2 THEN IF LO! (X+
1) -LO! (X) AND LEFT$ (NO$ (X+1
) ,8)>LEFT$(NO$(X) ,8) THENS
WAP NO$(X+l) ,NO$(X) : B-1 :
RT-X ELSE 2210
2180 FOR Y-1 TO 21
2190 SWAP BY% (RT+1, Y) ,BY% (R
T,Y)
2200 NEXT
2210 NEXT
2220 IF B-1 THEN 2140 ELSE
2230
2230 '
2240 IF CSDI%>-1 THEN 2250
ELSE 2430 ' Pregunta si el
disco tiene etiqueta de vol
. o subdirectories
2250 ' Caso de etiqueta de
volumen MS-DOS y subdi recto
rios
2260 CV-1
2270 FOR X-PP+CSDI% TO CSDI
% STEP -1
2280 SWAP NO$ (X) ,NO$ (X-CSDI
%)
2290 FOR Y-1 TO 21
2300 SWAP BY% (X,CV) ,BY% (X-C
SDI%,CV)
2310 CV-CV+1
2320 NEXT
2330 CV-1
2340 NEXT
2350 FOR X-1 TO CSDI%
2360 NO$(X)-SDI$(X)
2370 FOR Y-1 TO 21
Pag. 14
2380 BY% (X,CV) =BSDI% (X,CV)
2390 CV=CV+1
2400 NEXT
2410 CV=1
2420 NEXT
2430 ' GRABACION DEL DIRECT
ORIO ORDENADO
2440 ' Grabacion de los PP
archives- ordenados segrun el
criterio escogido
2450 PX=16 : PY»120 : TE$»"
Grabando directorio" : GOSU
B3790
2460 Y=1 : RR=0 : SG=FO ' D
etermina sector inicial de
grabacion
2470 SG-SG+1
2480 LOCATE 1,9 : PRINT"Gra
bando directorio. Sector Nr
o:";SG
2490 FOR I=DI TO DI+480 STE
P 32
2500 RR=RR+1
2510 IF RR>PP+CSDI% THEN 32
30 'pregunta si llego al ul
timo archive
2520 F0RJ=1T011
2530 Z»ASC (MID$ (NO$ (RR) , J, 1
))
2540 POKE (I+J-1) , Z
2550 NEXT
2560 FOR K=ll TO 31
2570 POKE(I+K) ,BY% (RR,Y)
2580 Y-Y+l
2590 NEXT
2600 Y=1
2610 NEXT
2620 DSKO$ DR,SG ' Grabacio
n del sector SG
2630 GOTO 2470
2640 ' Si llego al ultimo a
rchivo se limpia el resto d
e la informacion del Buffer
2650 FOR FIN=I TO DI+511
2660 POKE FIN,0
2670 NEXT
2680 DSKO$ DR,SG ' Grabacio
n del ultimo sector
2690 PX-16 : PY-135 : CT-1
: TE$«"*DIRECTORIO ORDENADO
*" : GOSUB3790 : PX=36 : PY
=150 : TE$="Otro disco?" :
GOSUB 3790
2700 PX=48 : PY=164 : CT=15
: TE$-"si no" : GOSUB 37
90
2710 C3=15 : Xl=45. : X2=60
: Yl=162 : Y2-174 : 13=1 :
GOSUB3000
2720 Y$-INKEY$ : IFY$=""THE
N2720
2730 IF Y$=CHR$(28)THEN 274
0 ELSE 2750
- 2740 C3=C : 13=1 : GOSUB 30
00 : Xl=76 : X2=91 : C3=15
: 13=1 : GOSUB 3000
2750 IF Y$=CHR$(29) THEN 27
60 ELSE 2770
27 60 *C3*C : 13=1 : GOSUB 30
00 : GOTO 2710
2770 IF Y$=CHR${32) THEN 27
80 ELSE 2720
2780 BEEP : BEEP : IF Xl=45
THEN RUN ELSE SCREEN 0 : C
OLOR 15,4,4 : CLEAR 200 : E
ND ' en case de no ordenar
otro disco se reestablecen
los parametros iniciales
2790 ' PRESENTACION
2800 Xl=64 : X2=196 : Yl=4
: Y2=28 : 12=1 : V=1 : C=9
2810 GOSUB 3000 'dibujo de
ventana
2820 PSET(76,13) ,9 : PRINT#
1,"D I R S 0 R T" : PSET(77
,12), 9 : PRINT#1,"D I R S 0
R T"
2830 Xl=48 : X2=208 : Yl=56
: Y2-128 : C=14 : 12=1 : V
=1
2840 GOSUB 3000 'dibujo de
ventana
2850 DX=24 : DY=0
2860 GOSUB 3730 'dibujo de
diskette izq
2870 DX=208 : DY=0
2880 GOSUB 3730 'dibujo de
diskette der
2890 PX=54 : PY=60 : CT=1 :
C=14
2900 TE$="DirSort Version 1
.1 - MSX"
2910 GOSUB 3110 'imprime el
texto TE$
2920 PX=54 : PY=80 : TE$="A
utor: Carlos E. FRANCHERI" :
GOSUB3110
2930 PX=108 : PY=88 : TE$="
(c) 1988** : GOSUB3110
2940 PX=60 : PY=104 : TE$="
Para la revista LOAD MSX" ;
GOSUB3110
2950 PX=54 : PY=112 : TE$="
4to.concurso de programas"
: GOSUB3110
2960 X1*0 : X2=256 : Yl=184
: Y2=192 : C=15 : V=1 : GO
SUB 3000
2970 PX=8 : PY-184 : CT=12
: TE$="Use los cursores y 1
a barra espaciadora" : GOSUB
3110
2980 Y$=INKEY$ : IFY$=""ORY
$<>" " THEN2980 ELSE COLOR
15,4,4
2990 RETURN
3000
ruTINA ventan
A Y CUADROS
3010 IF V=1 THEN LINE (XI, Y1
)-(X2,Y2) ,C,BF
3020 IF 11=1 THEN LINE (XI, Y
1)-(X2,Y2) ,C1,B : LINE (Xl+2
,Yl+2)-(X2-2,Y2-2) ,C1,B ' c
aso flag 11=1 activa recuad
ro
3030 IF 12=1 THEN PSET (Xl-1
,Y1),1 : LINE-STEP (0,Y2-Y1)
: LINE-STEP (X2-X1+1,0) : P
SET(X1-1, Yl) , 1 : LINE-STEP (
-1,2) : LINE-STEP (0,Y2-Y1)
: LINE-STEP (X2-X1,0) : LINE
-STEP (2, -2) : PAINT (X2-4 , Y2
+1),1 ' case flag 12=1 acti
va marco 3D
3040 IF 13=1 THEN LINE (XI, Y
1)-(X2,Y2) ,C3,B ' case flag
13=1 activa cuadro de opci
on
3050 V=0 : 11=0 : 12=0 : 13
=0 : RETURN
3060 ' RUTINA: DIBUJO DEL
DISQUETTE
3070 PRESET (DX,DY) : COLOR
1 : DRAW"d24r2d312d6r25u331
8dll2ull4dll2ull8** : CIRCLE
(DX+13,DY+17) ,5 : CIRCLE (DX
+ 13,DY+17),3 : PRESET (DX-f 13
,DY),1 : DRAW"f2d6g2h2u6e2**
: PAINT (DX+3,DY+10) : PRES
ET(DX+7,DY+14) : PRESET (DX+
8,DY+14)
3080 X1=DX+12 : Yl=DY+24 :
X2*Xltll : Y2=Yl+7 : C=ll :
V=1 : GOSUB 3000
3090 PRESET (DX+13,DY+25) , 1
: DRAW"D4U3R1E1D4** : PRESET
(DX+17,DY+25) ,1 : DRAW"C1BR
2L1G1F2G1L2** : PRESET (DX+20
,DY+25),1 : DRAW"D1F2D1U1H1
G1D1U1E2U1**
3100 RETURN
3110 ' RUTINA: 1 CARACTER 6
X6
3120 TE=LEN(TE$)
3130 FOR X=1 TO TE
3140 TC$=MID$(TE$,X,1)
3150 PSET(PX,PY) ,C : COLORC
T : PRINT# 1,TC$ : PX=PX+6
3160 NEXT
3170 RETURN
3230 '
3660 '
3730 '
3790 '
Pag. 15
LANUEVA
COMUNICACION
Telemdtica ha presentado recientemente un nuevos productos en el area de
comunicacion y transmision de datos. En esta nota descubrimos y analizamos
las prestaciones del modem TMX-520.
a telemdtica es la conjuncion
tecnologica de la informdtica y
las comunicaciones. Debido al auge que
tuvo esta disciplina en los ultimos anos
Telematica desarrold el modem , para ha-
cerlo mds funcional.
MODEM
EN CARTUCHO
Con una computadora Talent MSX1 o
MSX2, o cualquier otra que responda a la
norma MSX, y un telefono conectado a la
red publica, el nuevo modem TMX-520
permite comunicarse con otras computa-
doras o term inales, ademds de posibilitar
el acceso a bancos de datos locales y del
exterior, BBS (Bulletin Board System),
conferencias y correo electronico.
El Modem Talent MSX incorpora un ca-
nal serie asincrdnico y un modulador/de-
modulador que cumple con la norma
CCITT a 300 baudios, full-duplex. Puede
ser preparado tanto para emitir ("Origina-
te”) como para recibir ("Answer” ).
Este modem incorpora software en
ROM, aproximadamente unos 8 KB, lo
que simplifica notablemente su uso.
Puede ser utilizado con programas desa-
rrollados por el usuario, o bien con el pro-
grama de comunicacion estdndar sumi-
nistrado en su memoria ROM. Incluye
instrucciones expandidas para el BASIC,
que permiten el manejo de una linea de
comunicaciones como si fuera un archi-
vo, esdecircon instrucciones de “input” y
“output” aplicables a archivos en disco o
casete.
El software estandar incluido en el mo-
dem facilita la comunicacidn con las ba-
ses de datos mas difundidas, sin necesi-
dad de realizar ninguna programacidn.
Lo primero que notamos al comparar es-
te modem con el anterior de Talent (TMX-
51 0) es su tamafio compacto: es un sim-
ple cartucho de tamano igual al del ex-
pansor a 80 columnas. Ya no se incluyen
ni el MSX-WRITE ni el MSX-PLAN, lo
que posibilita que este modem sea mas
economico.
La conexidn al telefono se realize en la
forma acostumbrada; se une a unos bor-
nes que se encuentran en la parte supe-
rior derecha del cartucho. En la parte iz-
quierda se halla la llavecita que permite
conmutar de la Ifnea telefdnica al mo-
dem.
Otra diferencia destacable es el progra-
ms de comunicaciones que se adecua a-
las nuevas caracteristicas.
Para invocarlo, se debe ingresar el co-
mando:
CALL MODEM
y aparece el programs de comunicacio-
nes que permite el envfo y capture de ar-
chivos.
Las opciones incluidas son:
FI: Tron/Troff:
Race que se pueda enviar a la impreso-
ra cada caracter recibido. Por defecto,
se encuentra desactivado.
F3: Graba/No Graba:
Se utilize para abrir y cerrar el “buffer” de
capture. Su capacidad es de 32 kbytes.
Por defecto se encuentra desactivado.
Con esta opcion podemos almacenar to-
do lo recibido para luego tratarlo con al-
gOn procesador de texto o listarlo.
F4: CIs:
Borra la pantalla.
F5: Eco:Sf/Eco:No:
Permite obtener un “eco” de lo ingresado
por el usuario en la pantalla. Por defecto
se encuentra desactivado, ya que ACA-
matica, Delphi y otras bases de datos ha-
cen ellas mismas el eco.
Pag. 16
F6: LF:Sl/LF:No:
Agrega un salto de rengidn luego de pul-
sar <RETURN>. Por defecto se encuen-
tra desactivado.
F7: Originate/Answer:
Modalidad del full-duplex. Por defecto se
encuentra en “Originate”.
F8: bit7:No/bit7:Sl:
Cancela el 7 bit del car^cter recibido. Por
defecto no lo cancela.
F9: Ancho: (para MSX2)
Permite obtener un ancho de 80 o 40 co-
lumnas. Por defecto es 40 columnas.
Cabe aclarar que lo que se ve en panta-
lla no es el estado de la opcibn sino lo que
se obtiene cuando se pulsa la tecia de
funcion correspondiente. Esto puedetra-
er confusion. Por ejempio, cuando la op-
ci6n “Originate/Answer” estaen “Origina-
te”, en pantalla se visualize “Answer”.
Si pulsamos la tecia <SELECT>, se ob-
tiene el menO de opciones que nos per-
mite grabar el contenido de memoria en
disco 0 casete, limpiar la memoria (el buf-
fer), visualizarla, enviar archivo o salirdel
programa terminal.
El envio de archivo es para archives de
texto ASCII y no permite incluir pauses
en el envio (como requiere ACAmbtica).
En este aspecto funciona igual que el
programa de terminal del modem ante-
rior.
Por Oltimo, realizamos pruebas con las
bases de dates arriba citadas y funcioha-
ron sin problemas. La unica limitacion no-
toria de este modem con respecto al an-
terior es la siguiente: el nuevo periferico
no es binorma “Bell/CCITT”. Pero como
es muy econbmicoy la norma que emple-
an las bases de dates nacionales es
CCITT, estafalta no resultatan significa-
tive.
Como conclusibn, este producto nos fa-
cilita el ingreso al mundo de la telematica
con muy bajo costo y bptimos resultados.
CARACTERISTICAS TECNICAS
- Construido con circuitos integrados de altatecnologia, por lo que resulta de un
diseho compacto en forma de cartucho enchufable MSX estandar.
- No requiere fuente de alimentacibn externa.
- Norma CCITT.
- Velocidad 300 baudios full-duplex.
- Buffer de 128 caracteres para la recepcion.
- Software incorporado:
a) Expansion de las instrucciones BASIC para el manejo de la Ifnea de comu-
nicaciones.
b) Mode terminal de la norma con manejo de impresora.
c) Modo terminal con manejo de archives.
d) Seleccion de parametros de comunicacibn mediante teclas de funcibn (en
el modo terminal con manejo de archives) o sentencias BASIC.
- Una sola Have selectora: LINEA/TELEFONO.
- Conexibn directa a la red telefbnica
SOFT
— LOS ESPECIALISTAS —
MAS DE 10.000 TITULOS EN DISCO Y CASSETTE
PARA MSX1-MSX2-SPECTRUM-COMMODORE DESDE A2
MSX2 • EXCLUSIVOS ij1942 • PENGUIN ADVENTURE!!
DISCO y CASSEHE
VENI A CONOCERNOS EN NOVIEMBRE... Y TE REGALA-
REMOS UN JUEGO jjiSIN OBLIGACION DE COMPRA!!!
OFERTAS
CASSETTE 12 JUEGOS MSX A 29,90
CASSETTE 12 JUEGOS SPECTRUM A 29,90
CASSETTE 20 JUEGOS COMMODORE A 25
DISKETTES DYXI 5 1/4 DD A 125
DISKETTES NASHUA 3 1/2 DD A 390
DISKETTES BASF 5 1/4 DD A 159
LUNES A SABADO 9-21 HS
VENTAS POR MAYOR Y MENOR - ENVIOS AL INTERIOR
AV. SANTA FE 3117 Loc. 1 - Tel.; 825-0977
JUEGOS MSX EN DISCO Y CASSETTES
MADMIX GAMES - GAME OVER - ARKOS
VENOM (MASK III) - TURBO GIRL - BLACK BEARD
TAIPAN - MATCH DAY 2.
lUEGOS MSX2: PERRY MASON I y II -
EGGERLAND MISTERY II - METAL GEAR -
L' AFFAIRE - NEMESIS IV - 1942
UTILITARIOS MSX: GEOS PRINT SI lOP -
MICHELANGELO - EASY 2.0 - CP/M 3.0 -
VIDEOGRAPHICS y 1000 mas...
AV. STA FE 2450 LOC. 40 CP (1425)
Tel. 821-9438
Pag. 17
f:
INCON DEL USUARIO
DE TALENT MSX
UN UTILITARIO PARA MSX BASIC:
REFERENCIAS CRUZADAS
Este uWitario permite realizar un seguimiento da un programa BASIC mds fdcilmente, ya
qua ganara una llsta con las linaas dal softwara qua son Invocadas, ya saa con GOSUB o
GOTO, an cualquiar parta da un programa.
ara qua este programa funcione
correctamente, se debe alma-
cenar el programa que se va a e-
jecutar en formato ASCII, es decir usan-
do la opcidn “,A” del SAVE con unidad de
discos (por ejempio: SAVE "EJEM-
50 '
60 ' Referencias Cruzadas
70 ' Autores: Hugo D. Caro
75 ' Roberto N. To
kuda
80 ' Tipo : Utilitario
85 ' Revista Load MSX
100 '
110 CLEAR500:DEFINT A,B
120 AM-200 :BM-500
130 DIM A(2,AM) ,B(1,BM) ,KL(
6) ,KW$ (6)
140 FOR I-O TO 6
150 READ KW$(I) ,KL(I)
160 NEXT
170 DATA GOTO, 4, GOSUB, 5, RET
URN , 6 , RESTORE , 7 , THEN , 4 , ELSE
, 4, RUN, 3
180 K1$-CHR$(34)
PLO”,A), o bien el comando SAVE por si
solo, si se trabaja con casete (por ejem-
pio: SAVE “CAS:EJEMPLO").
He aqui el listado:
190 K2$-"DATA"
200 K3$-"' ":K4$-"REM"
210 P1-1:P2-1:A(0,0)=0
220 INPUT "Nombre archive:"
;FL$
230 OPEN FL$ FOR INPUT AS #
1
500 ' Rutina Principal
510 IF EOF(l) THEN CLOSE# 1:
GOTO 4000
520 LINE INPUT#1,TX$
530 GOSUB 1000
540 GOSUB 2000
550 GOTO 510
1000 ' Eliminar Strings
1010 L$-""
1020 F-INSTR(TX$,K1$)
1030 IF F-0 THEN 1070
1040 L$-L$+LEFT$(TX$,F-1) :T
X$-MID$ (TX$,F+1)
1050 F=INSTR(TX$,K1$)
1060 IF F>0 THEN TX$=MID$ (T
X$,F+l);GOTO 1020
1070 TX$-L$+TX$:L$=""
1080 ' Elindnar DATA
1090 F-INSTR(TX$,K2$)
1100 IF F=0 THEN 1150
1110 L$=L$+LEFT$ (TX$,F-1) :T
X$=MID$ (TX$,F+4)
1120 F=INSTR(TX$,
1130 IF F>0 THEN TX$=MID$ (T
CENTROS DE ASISTENCIA AL USUARIO DE TALENT MSX
CAPITAL FEDERAL
Taller Logo de computacion
Junin 1930
Centro de Computacidn Cllnica
Asistencia al Usuario Discapacitado
Ramsay 2250 - Pabelldn F
Tel. 784-2018
Barrio Norte
Uriburu 1063 - Tel. 83-6892/826-6692
Belgrano
Cabildo 735 - Tel. 772-9088
Flores
Gral. Artigas 354 - Tel. 612-3902
Palermo
Guatemala 4733 - Tel. 71-4124
San Telmo
Chile 1345 - Tel. 37-0051 al 54
GRAN BUENOS AIRES
Caseros
Medina y Alberdi - ler piso - Tel. 750-
8016.
Castelar
C. Casares 997 - Tel. 629-2247
LanOs
Caaguazu 2186 - Tel. 240-0378
Mor6n
Belgrano 1 60 - Tel. 629-3347
Quilmes
Moreno 609 - Tel. 253-6086 al 89
Ramos Mejia
Bolivar 55 - ler. piso - Tel. 658-4777
San Isidro
Av. Centenario 705 - Tel. 743-9678/747-
6094
San Justo
Peni 2515 (esq. Arieta)
Pag. 18
X$,F+l):GOTO 1090 ELSE TX$-
%\//
1140 ' Elindnar REMs y '
1150 TX$-L$+TX$ :
1160 F-INSTR(TX$,K3$)
1170 IF F-0 THEN F-INSTR(TX
$,K4$)
1180 IF F>0 THEN TX$-LEFT$ (
TX$,F-1)
1190 RETURN
2000 ' Separa numero linea
2010 S-INSTR(TX$," *)
2020 IF S-0 THEN RETURN
2030 LN-VAL(LEFT$(TX$,S-D)
2040 ' Buacar palabra clave
2050 FOR K-0 TO 6;P-S
2060 F-INSTR(P,TX$,KW$(K))
2070 IF F>0 THEN GOSUB 2090
;GOTO 2060
2080 NEXT: RETURN
2090 N$-'"';P-F+KL(K)-1
2100 P-P+1
2110 C$-MID$(TX$,P,1)
2120 IF 0$-'"' OR 0$-*:" THE
N GOSUB 3000:R£TURN
2130 IF ASC(C$)>47 AND ASC(
C$)<58 THEN N$-N$+C$:GOTO 2
100
2140 IF C?-"," THEN GOSUB 3
000: GOTO 2100
2150 IF C$-" « THEN 2100 EL
SE RETURN
3000 ' Agrega a lista
3010 IF N$-'"' THEN RETURN
3020 IF P1>AM (» P2>BM THEN
PRINT "Se lien) el vector"
:GOTO 4000
3030 JN-VAL(N$) :N$-"":RP-0
3040 PRINTUSING"#####<-###
##";JN,LN
3050 CP-0
3060 IF A(0,CP)<0 THEN N-A(
0,CP)+65536! ELSE N-A(0,CP)
3070 IF N-JN THEN 3180
3080 IF N<JN THEN 3130
3090 IF JN<32768! THEN A(0,
PD-JN ELSE A(0,Pl)-JN-6553
6!
3100 A(l,Pl)-A(l,OP)
3110 A(1,0P)-P1:CP-P1:P1-P1
+1
3120 GOTO 3180
3130 OP-CP:CP-A(l,CP)
3140 IF CP>0 THEN 3060
3150 A(l,OP)-Pl:IF JN<32768
! THEN A (0, PD-JN ELSE A(0,
Pl)-JN-65536!,
3160 CP-P1:P1-P1+1
3170 GOTO 3180
3180 ' Agregar
3190 IF A(2,CP)-0 THEN A (2,
CP)-P2:P2-P2+1
3200 NP-A(2,CP) :IF LN<32768
! THEN N-LN ELSE N-LN-65536
I
3210 IF B(0,NP)-0 THEN B(0,
NP)-N; RETURN
3220 IF B(l,NP)-0 THEN B(l,
NP)-P2:P2-P2+1
3230 NP-B(1,NP) ;GOTO 3210
4000 ' Inprimir
4010 INPUT ''0:Pantalla 1:1
mpresora";P
4020 IF NOT (P-0 OR P-1) THE
N 4010
4030 IF P-0 THEN F$-"CRT:":
L-32:GOTO 4070 ELSE F$-"LPT
• ^
•
4040 INPUT "Longitud l{nea
(15-80) ";L
4050 IF L<15 THEN L-15
4060 IF L>80 THEN L-80
4070 OPEN F$ FOR OUTPUT AS
«1
4090 PRINT#1, "Archive : " ; FL$
4100 PRINT#1," — XREF -
_ ff
4110 P-A(1,0)
4120 IF P-0 THEN END
4130 N-1:IF A(0,P)<0 THEN J
-A(0,P) +65536! ELSE J-A(0,P
)
4140 PRINT#!, USING ”##### <
-";J;
4150 I-A(2,P)
4160 IF B(0,I)<0 THEN J-B(0
, I) +65536! ELSE J-B(0,I)
4170 IF N*6+9>L THEN N-1:PR
INT#1, :PRINT#1,"
4180 PRINTtl, USING" :##♦#♦";
J;:N-N+1
4190 I-B(1,I):IF I-O THEN P
RINT#1,CHR$(13) :P-A(1,P) :GO
TO 4120
4200 GOTO 4160
Si algi^n memorioso piensa qua ya vio este programa, estii an lo darto: sa public6 haca alradador da 2 aRos an la ravis-
ta K'M... Paro al notar qua las nuavas ganaracionas y los lactoras da la Load MSX no lo conoefan como una plaza inmor-
tal da softwara, lo publicamos aqui.
VIcanta L6paz
Av. MaipO 625 • Tal. 797-672
Vlrrayaa - Pdo. da San Farnando
Avallanada 1 697 - Tal. 745-7963
INTERIOR DEL PAIS
Bahia Blanca • Buanos Airaa
Oral. Paz 257 - Tal. (091) 31582
Junin • Buanoa Airaa
Gandini 75 - Tal. (0362) 27956
e
La Plata - Buanoa Airaa
Calla48No.529-Tal. (021) 249905 al 07
Mar dal Plata - Buanos Airaa
Av. Luro 3071 - 1 3o. "A" -Tal. (023) 43430
Nacochaa - Buanoa Airaa
Calla 61 No. 2949 - Tal. (0262) 26583
Comodoro RIvadavla • Chubut
San Martin 263 - Local 22 - Tal. (0967)
20794
Cdrdoba • Cdrdoba
9 da julio 533 - Tal. (051 ) 20083
Villa Marla - Cdrdoba
Corrlantas 1 159 - 2do. piso - Tal. (0535)
24311
Concordia • Entra Rloa
Urdinarrain 50 • Tal. (045) 213229
Parani - Entra Rloa
COrdoba 67- Tal. (043) 225987
Mandoza -Mandoza
RIvadavla 76 - lar. piso - Tal. (061)
291348/293151
Vladma - Rio Nagro
San Martin 24 - Tal. (0920) 21888
Rosario - Santa Fa
Bar6n da Maua 1 088 - Tal. (041) 21 0747
Santa Fa • Santa Fa
RIvadavla 2553 - Loc.22 - Tal. (042)
41832
San Juan* San Juan
Santa Fa 409 Esta
S.M.da Tucumdn - TucumAn
Bolivar 374 • Tal. (081 ) 245007
SOFTWARE DISPONIBLE PARA MSX
Una de las preguntas mds frecuentes as qud lenguajes y utilitarios se pueden obtener pa-
ra MSX. En esta ocasidn actuallzamos la llsta de lo qua antendemos qua existe an el mar-
cado comq software en disquata para MSX1 y MSX2 qua fue publlcada hace algunos hu-
meros. Esta llstado no Incluye sistemas da contabllldad nl software comerclallzado por
Talent an disco.
or lo que sabemos, el ijnico soft*
ware de la llsta que posee repre-
II^P sentante es el dBASE II y se
pu^e obtener el producto original con su
respectivo manual. El resto, “chi to sa.”
Las columnas indican lo siguiente:
1. NOMBRE: el tftulo del soft.
2. MSX: si corre en MSX1 con 40 colum-
nas (configuracidn est^ndar).
3. MSX 80: si corre en MSX1 pero con el
cartucho ampliacidn a 80 columnas.
4. MSX2: si corre en MSX2 con 40 u 80
columnas.
-ScroUinf--
^ IP lim *Z ^
'fi m fcrtan X dow>
left ^ Chur ri*t
*"?IS25SS‘
line
screen
CO. 81
H A I N
-Itelete-
char
9|L chr ir.
'y line
MENU
^I^ON
'“I Tab '‘B Re£n
'V INSERT
word rtl;^FindiRepIce again
TTURN End paraara^
^ Insert a REtUwI
Stop a coeeand
f®- .
^ M Coliunas
^ca1.a.
„ BB, CARTUCHO
SSCOUMAS
BE
* control on tl diso
es
ianente
isco qut
SOFTWARE DISPONIBLE PARA MSX EN DISQUETE
(Conocido como de “Dominb Publico”)
TITULO
TlPO
9K 9K SK 9C 29E S& Sf SS SS SS SS SS XSISS ^5 SS S8
1
sssssss
2
3
4
ALGOL-^v”l"*“" ’
SS MM
COMPILADOR
SI
’sT"
sT’
"si
AZTEC C II V.1.06B
COMPILADOR
SI
SI
SI
SI
BASIC 80 COMPILER
COMPILADOR
SI
SI
SI
SI
BDS C COMPILER
COMPILADOR
SI
SI
SI
SI
COMPAS V. 3.02 - COMPILADOR PASCAL COMPILADOR
NO
SI
SI
NO
FORTRAN 80 COMPILER
COMPILADOR
SI
SI
SI
SI
JRT PASCAL COMPILER
COMPIUDOR
SI
SI
SI
NO
MS-COBOL 80 COMPILER
COMPILADOR
SI
SI
SI
SI
MSX C COMPILER
COMPILADOR
SI
SI
SI
SI
NEVADA COBOL V.3.4
COMPILADOR
NO
NO
SI
NO
RM-COBOL COMPILER
COMPILADOR
SI
SI
SI
SI
SUPERSOFT C COMPILER
COMPILADOR
SI
SI
SI
SI
TURBO PASCAL COMPILER
COMPILADOR
SI
SI
SI
SI
UTILITY SOFTWARE PACKAGE:M80/L80
ENSAMBLADOR Y DEBUGGER
SI
SI
SI
SI
MSX DUAD ASSEMBLER/DEBUGGER
ENSAMBLADOR Y UTILITARIOS
SI
NO
SI
NO
MICRO PROLOG
INTERPRETE
SI
SI
SI
SI
MULISP
INTERPRETE
SI
SI
SI
SI
NEVADA PILOT
INTERPRETE
SI
SI
SI
SI
TIMIN FORTH
INTERPRETE
SI
SI
SI
SI
CP/M PLUS FOR MSX2
CP/M VERSION 3.0
NO
NO
SI
SI
ABSTAT
APLICACION ESTADISTICA
NO
SI
SI
NO
THE FANCY FONT SYSTEM
APLICACION IMPRESORA
SI
SI
SI
SI
MSXDOS TOOLS
APLICACION MSX-DOS
SI
SI
SI
NO
SUPERSORT
APLICACION ORDENAMIENTO
SI
SI
SI
SI
DUTIL + DSORT
APLICACION PROG. DBASE
NO
SI
SI
SI
QUICK SCREEN
APLICACION PROG. DBASE
NO
SI
SI
SI
COMPUTER CHEFV.I.Oa
APLICACION RECETAS COCINA
SI
SI
SI
NO
CARDBOX
BASE DE DATOS
NO
SI
SI
NO
DBASE llv.2.4
BASE DE DATOS
SI
SI
SI
SI
MS BASE
BASE DE DATOS
SI
NO
SI
NO
CITATION V.3.0
BASE DE DATOS BIBLIOTECA
NO
NO
SI
NO
DBASE COMPILER
COMPILADOR DBASE
NO
NO
SI
NO
CURSO MSX BASIC
CURSO DE BASIC P/MSX
SI
NO
SI
NO
IMAGENES PHILIPS MSX2
DEMOSTRACION IMAGENES
NO
NO
SI
NO
Pag. 20
TITULO
TlPO
1 2
3
4
DEMO ]^SX2 TALEN^
DEMOSTRAcioN P^”^
""""noTTo'
sF
"no
DEMO MSX2 TALENT CHILE
DEMOSTRACKDN P/MSX2
NO NO
SI
NO
AACKO DRAW & PAINT
GRAFICADOR
SI NO
SI
NO
CHEESE 2
GRAFICADOR
NO NO
SI
NO
NATIONAL VIDEO GRAPHICS
GRAFICADOR
NO NO
SI
NO
PHILIPS DESIGNER PLUS
GRAFICADOR
NO NO
SI
NO
PHILIPS VIDEO GRAPHICS
GRAFICADOR
NO NO
SI
SI
PIXEL 2 GRAPHIC EDITOR
GRAFICADOR
NO NO
SI
NO
SONY EASY TELOPPER
GRAFICADOR
NO NO
SI
NO
SONY GRAPHICS EDITOR
GRAFICADOR
NO NO
SI
SI
VICTOR GRAPHICS EDITOR
GRAFICADOR
NO NO
SI
NO
GRAFICADORES VARIOS PARA MSX
GRAFICADORES
SI NO
SI
NO
PHILIPS EASE V.1. 4
PAQUETE INTEGRADO MSX2
NO NO
SI
SI
■ i.'t
PHILIPS HOME OFFICE 1
PAQUETE INTEGRADO MSX2
NO NO
SI
SI
- •
- ■.
PHILIPS HOME OFFICE 2
PAQUETE INTEGRADO MSX2
NO NO
SI
SI
MULTIPLAN v.1 .06
PLANILLA DE CALCULOS
SI SI
SI
SI
MSTEXT IDS V.2.2
PROCESADOR DE TEXTO
SI NO
SI
NO
TASWORD MSX
PROCESADOR DE TEXTO
SI NO
SI
SI
WORDSTAR 80 COLS.
PROCESADOR DE TEXTO
NO SI
SI
SI
EDITORES MUSICALES PARA MSX
PROGRAMAS P/MUSICA
SI NO
SI
NO
REFERENCIAS
1 : Funciona en MSX1
2: Funciona en MSX1 con cartucho expansor 80 columnas
3: Funciona en MSX2
4: Tiene manual
EXPO-CIENCIA ’88
OS dfas 14, 15, 16 y 17 de octu-
bre del corriente se realizd en
Caseros, Pcia. de Buenos Aires,
la muestra Expo-Ciencia '88 auspiciada
por la Direccidn General de Escuelas y
Culture, Direccidn de Clencia y T^cnica,
Municipalidad de Tres de Febrero y la
Comisibn de Investigadones Cientfficas
de la Pcia. de Buenos Aires.
La organizacibn del evento estuvo a car-
go del Ateneo de Divulgacibn Informbti-
ca, es decir el Centro de Asistencia al U-
suario de Caseros.
Los objetivos de la muestra fueron: faci-
litar la interaccibn entre el hombre comun
y el saber cientifico, demostrando el im-
portante impacto y las implicancias que
el cambio tiene sobre la vida Humana,
sus relaciones sociales, su vinculacibn
con el medio y la actividad productiva.
Las actividades que se desarrollaron en
el bmbHo de la Expo-Ciencia '88 se agru-
paron en torno a cuatro>tembticas dife-
rentes:
1) seminario provincial de extensibn de
las actividades cientfficas y tecnoibgicas
en la educacibn,
2) simposio municipal para la pequeHa y
mediana empresa,
3) encuentro “La dencia y la tbcnica en el
pensamiento nacional” y
4) feria regional de dencias del noroeste
del conurbano bonaerense.
En esta Feria se expusieron diversos pro-
dudos de entidades de todos los niveles,
incluso escuelas, organismos ofidales o
piivados y empresas que acreditaron su
vinculadbn a la jurisdiocibn de los parti*
dosde Tres de Febrero, San Martin, Gral.
Sarmiento, Morbn y La Matanza.
Telembtica S.A. estuvo presente con un
stand de informbtica educativa y mostrb
su Ifnea de computadoras MSX con uni-
dades de disco y la digitalizadora de imb-
genes de video, de prbxima aparicibn en
el mercado argentine.
En el stand se presentb abundante soft-
ware educative producido por las firmas
Arandb Soft y Micrombtica, asf como di-
versos graf icadores y software de aplica-
cibn para MSX1 y MSX2.
Pag. 21
IN CON DEL USUARIO
DE TALENT MSX
CONTESTANDO A LA HOT-LINE
FECHAS
Soy usuario del ^BASE II y querla con-
sultar lo siguiente: ^c6mo puedo hacer
paraque el mismo reconozcalafechadel
sistema operativo MSX-DOS sin tener
que ingresarlo manualmente?
Respuesta
Tenemos entendido que existe una for-
ma de setear el dBASE para que tome la
fechadesde “afuera’del mismo, pero no
disponemos de dicha informacidn. Sin
embargo, si tenemos las direcciones de
memoria donde el sistema operativo al-
macena la fecha:
62024: dia
62025: mes
62026: a^o (en un formato especial)
Para ingresar la fecha bastard invocar el
dBASE con el sigufente archive de co-
mandos (para fechas cuyo aho sea ma-
nor que 1999):
STORE STR (PEEK(62024),2) + V
"+STR(PEEK(62025),2)+r+STR(PE-
EK(62026)+80,2) TO F
SET DATE TO & F
RELEASE F
Si almacenamos este programa con el
nombre "FECHA.CMD”, serd suficiente
con invocar el dBASE de la siguiente for-
ma:
A>DBASE FECHA
y quedard seteada la variable DATE()
con la fecha almacenada por el MSX-
DOS.
EXPLORANDO LA VRAM
^Existe alguna forma de obtener de la
pantalla en SCREEN 0 qud cardcter se
estd mostrando en determinado lugar de
la pantalla?
Respuesta
SI, hay que cone ;er un poco la estructu-
ra interna de la Video RAM para obtener
estos dates. En SCREEN 0, la VDP (Vi-
Pag.22
deo Display Processor, procesadorde la
pantalla de video) almacena ios dates
necesarbs para representar la pantalla
de la siguiente forma:
Tabla de imagen de pantalia:
960 bytes (40 columnas * 24 f iias) en don-
de se almacenan cada uno de Ios c6di-
gos ASCII de Ios caracteres que se re-
presentan en pantalla.
Tabla de patrones:
2048 bytes (8 bytes por cada cardcter,
del 0 al 255) que representan Ios forma-
tes de cada cardcter ASCII que se puede
representar en pantalla.
Existe una funebn del MSX BASIC que
permite acceder a la posicbn de la me-
moria de Video en que se encuentra ca-
da una de estas tablas: BASE.
Para obtener ei cardcter que se estd re-
presentando en pantaila, bastard con
consultar la variable BASE(O) para lograr
la posicidn de Video RAM en donde se
encuentra y realizar las cuentas perti-
nentes para obtener la direcebn correc-
ta. El siguiente ejempio muestra ia fun-
ci6n GC que permite ejecutar esta tarea
cuando la pantalla tiene un ancho de 40
caracteres (WIDTH 40):
10 DEF FN GC(X,Y)-VPEEK(BA-
SE(0)+40*Y-i-X)
15 WIDTH 40: KEYOFF: CLS
20 FOR 1-0 TO 20
30 LOCATEO: PRINT STRING$(PE-
EK(&HF3B0)-1 ,CHR$(l+65))
40 NEXT I: LOCATE6,6: PRINT*”:
FOR 1-1 TO 1000: NEXT:
A-FNGC(6,6): CLS: PRINT “CARAC-
TER:";CHR$(A)
IMPRESIONES EN LOGO
^Existe alguna nueva versbn del Talent
MSX Logo o algun programa que permi-
ta volcar la pantalla por impresora, inclu-
yendo Ios grdficos de latortuga?
Respuesta
SI, tenemos a la venta las denominadas
“extensiones al LOGO” que incluyen la
primitive “copiarpantalia” que realiza es-
ta tarea. Es posible usar impresoras tipo
MSX compatibles, Epson compatibles y
Seikosha GP550.
Por otra parte, este conjunto de progra-
mas (que se venden en un disquete) in-
corpora primitives para ei manejo de ar-
chives, el LOGO musical, que permite
manejar la parte de sonido de la misma
manera que se maneja la sentencia
PLAY en MSX BASIC, pero con las notas
tradicionales (DO, RE, etedtera), ade-
mds de las conocidas extensiones dei
LOGO tridimensional.
ENES Y ACENTOS
Tengo una Epson LX-800 y me dijeron
que con las MSX puede imprimir las ehes
y Ios acentos. Sin embargo, no iogro que
esto suceda. ^Es unafallade la impreso-
ra o no es cierto b que me indicaron?
Respuesta
Todo es un problems de ‘seteo’. Existen
unos pequehos interruptores en la parte
trasera de su impresora que permiten se-
tear diversas f unciones, entre eilas el lar-
go de hoja y el tipo de cardcter que se va
a utilizar.
El seteo recomendado para usar con
MSX es:
ON
-1— »• +--I” +-+ +-+ +-+ +-+ +-+ +-+
1 1 1 1 1*1 1 1 1 1 1*1 1*1 1*1
+--I-
1*1 1 1
+-+
1 1
+-+
1 1
ON
OFF
1*1 1*1 1 I l*i 1*1 1 1 1 1 1 1
1 1 1*1
1*1
1*1
OFF
-f-f +-+ +-+ +-+ +-+ +-+ +-+ +-+
1-1 1-2 1-31-4 1-5 1-6 1-7 1-8
+-+ +-+
2-1 2-2
+-+
2-3
+-+
2-4
SIMULTANEO CON EE.UU.
SUPLEMENTO BYTE EN K64
s
PALETA GRAFICA
Tipo: Utilitario
Autor: Jorge Bautista Gizirian
PARTICIPO EN EL 4*“ CONCURSO DE PROGRAMAS
Para volver al color anterior hay qua
presionar “C”.
Con la tecia “S” se puede grabar el di-
bujo en disco.
MODO TEXTO
ste es un programa muy prdc-
]9B tico para dibujar e imprimir
uSBm gr^icos y carteles. Se pueden
destacar entre sus virtudes la facilidad
de uso y la precisibn de tos grbficos.
Existen dos modos de trabajo: grbfico
y de texto.
MODO GRAFICO
Para dibujar hay que llevar el Ibpiz has-
ta cuaiquier lugar de la pantalla. Si se
presiona la "L" y en la parte inferior de
la pantalla aparece recuadrado-SD, en-
tonces el Ibpiz se deslizarb dejando un
rastro de tinta sobre la pantalla. Si, por
el contrario, aparece ND, entonces el
Ibpiz se desplazarb sin dibujar.
Tambibn se pueden graficar rectas. Pa-
ra ello hay que determ inar el punto de o-
rigen de las mismas presionando la ba-
rray el punto final con la tecia RETURN.
Luego autombticamente se trazarb la
recta. Todo esto es posible si en la par-
te inferior de la pantalla dice RECTA.
Para cambiar de RECTA a RECTAN-
GULO hay que presionar “P. Para di-
bujarlo se marca con la barra un vbrtice
y con RETURN el vbrtice opuesto.
Si se quiere una circunferencia, se de-
be presionar nuevamente "F"y, en vez
de RECTANGULO, aparecerb CIR-
CUNFERENCIA en la parte inferior de
la pantalla. Para dibujarla hay que lle-
var el Ibpiz hasta donde estarb el cen-
tre y presionar la barra hasta que apa-
rezea, abajo, el cuadrito que indica que
la barra ha sido pulsada. Luego se lle-
va el Ibpiz a cuaiquier punto del contor-
no y se presiona RETURN. Abajo apa-
rece; “Angulo inicial-0”. Con “+” au-
mentarb de valor y con disminuiri.
Cuando se tenga el bngub deseado se
pulsa la barra y se repite el procedi-
miento con el bngulo final. Una vez con-
Pag.24
cluido el procedimiento, se dibujarb el
cfrculo.
VENTAJAS: presionando cursor arriba
el bngulo cambia a 90°; cursor izquier-
da, a 180°; cursor abajo, a 270° y con
cursor derecha, a 0°.
Si se presiona nuevamente “F" ,apare-
cerb TRIANGULO. Para dibujarlo se
debe pulsar un vbrtice con la barra y
con RETURN el otro. Abajo aparecerb
“(derecha o abajo) o (izquierda o arri-
ba)”. Con “I” se dibujarb un triangulo e-
quilatero hacia la izquierda y con “D” u-
no hacia la derecha.
Presionando nuevamente “F”, cambia-
de TRIANGULO a RECTA.
Para pintar se oprime la tecia "P” en u-
na zona bordeada por el mismo color
que el del bpiz.
Con "I” pasarii el dibujo por el “plotter”.
Si se quiere cortar, hay que presionar
ESC y el programa volvera al modo e-
dicibn para que se pueda seguir dibu-
jando.
Con la tecia “B” se puede dibujar en
bianco. Esto sirve para borrar. Se usa i-
gual que otro Ibpiz de color, de esta ma-
nera se pueden dibujar rectbngulos y
circunferencias.
Primero hay que llevar el Ibpiz con el
cursor hasta cuaiquier lugar de la pan-
talla. Para empezar a escribir se debe
presionar la barra hasta que abajo apa-
rezea un cuadrado indicando que el
programa estb listo para escribir.
Recibn entonces se puede usar cuai-
quier tecia para escribir.
VARIABLES
Alfanumbricas
K$ = IN KEYS
NOM$ = Nombre del dibujo que se va a
realizar
NAM$ s Nombre del dibujo que se va a
cargar
CHR$(A )= Caracter rechazado
A$ s Sprite del Ibpiz
C$ s Inicial del color del Ibpiz
F$ = Nombre de la figura
L$ s Modo del Ibpiz
Numbricas
X,Y: Coordenadas del Ibpiz
M,N: Coordenadas del primer punto
CO: Color
C: Designs el color
F: Designs lafigura
L: Designs el estado del l^iz
V: Angulo inicial
W: Angulo final
Al: V en radianes
AF: W en radianes
R: Radio
D: Distancia N-Y
E: Distancia M-X
A: Distancia (X,Y)-(M,N)
Q,G,0,: Angulos
Distancias al nuevo punto
P: Color del punto (X,Y)
CC: Color del marcador del plotter
J: Repite tres veces la misma lines
10 ONERRORGOTO2280
20 SCREEN 0:CLS:COLOR1, 15, 15
: KEYOFF : WIDTH 4 0 : CLOSE : RESTO
RE160:B=0:POKE64683! , 1
30 LOCATE 0, 0: INPUT" (X=";X
40 IFX<0ORX>255THEN30
5 0 LOCATEO , 1 : INPUT" (Y=" ; Y
60 IFY<0ORY>169THEN50
7 0 LOCATEO , 2 : INPUT" (NOMBRE
DEL DIBUJO";NOM$
80 F0RA=1T09:IFMID$ (NOM$,A,
1 ) =" . "THENB=12 : NOM$=LEFT$ (N
OM$,A)+MID$ (NOM$,A+l,3) :A=9
90 NEXT A
100 IFB=0THENB=8:GOTO110ELS
EGOTO120
110 IFLEN(NOM$)>BTHENNOM$“L
EFT$ (NOM$,B)
120 CO»l:C=l:F=l:L=l:C$="N"
: L$="ND" : F$="RECTA"
130 SCREEN2
140 OPEN"GRP:"ASl
150 A$="":F0RA»1T08:READB$:
A$=A$+CHR$ (VAL(B$) ) :NEXT:SP
RITE$ (0)=A$
160 DATA128, 64, 48, 56, 28, 14,
7,2
170 LINE(0,180)-(255,191) ,1
5, BF: LINE (0,1 80) -(255, 180) ,
CO
180 COLORl ; PRESET (0, 181) : PR
INT#l,"x=":LINE (16, 181) -(48
,191) , 15, BF: PRESET (16, 181) :
PRINT#1 , RIGHT$ (STR$ (X) , LEN (
STR$ (X) )-l)
190 COLORl :PRESET (50, 181) :P
RINT#1, "y=":LINE(60,181)-(8
7,191), 15, BF: PRESET (64, 181)
:PRINT#1,RIGHT$(STR$(Y) , LEN
(STR$ (Y))-l)
200 LINE(130,181)-(248,191)
,1,BF: COLORl 5: PRESET (134, 1
Z: Ultimo punto leido =
bianco 0<> bianco
ESTRUCTURA
DEL
PROGRAMA
10-100: entrada de datos
11 0-220 :preparad6n de
pantalla
230-450: lectura de tecla-
do
460-470: dibuja o no al
desplazarse el lapiz
COMANDOS PARA EL USO
C: Cambia el color del lapiz
F: Cambia lafigura
L: Baja o sube el lapiz
I: Saca el dibujo por el plotter
B: Pone el lapiz en bianco, para borrar
S: Grabs el dibujo en disco
G: Carga un dibujo desde el disco
E: Cambia la paleta para escribir
P: Pints la zona limitada alrededor del l^piz
ESPACIO: Ubica el primer punto de la figura
RETURN: Ubica el segundo punto de la figura y la
grafica
82) :PRINT#1,F$
210 LINEdOO, 181) -(108, 191)
, l,BF:COLOR15: PRESET (101, 18
2) : PRINT# 1,C$
220 LINE(111,181)-(126,191)
, l,BF:COLOR15:PRESET(112, 18
2) :PRINT#1,L$
230 PUTSPRITEO, (X,Y),CO,0
240 S=STICK(0) :K$=INKEY$:IF
K$=""ANDS=0THEN230
250 IFS=lTHENY=Y-l:GOTO460
260 IFS=2THENY=Y-l:X=X+l:GO
TO4 60
270 IFS=3THENX=X+l:GOTO460
280 IFS=4THENY=Y+l:X»X+l:GO
TO4 60
290 IFS=5THENY=Y+l;GOTO460
300 IFS=6THENY=Y+1:X=X-1 :GO
T04 60
310 IFS=7THENX=X-l:GOTO460
320 IFS=8THENY=Y-l:X=X-l:GO
TO4 60
330 IFK$="C"THENGOSUB550
340 IFK$="F"THEN660
350 IFK$="L"THEN770
360 IFK$==CHR$ (32)THEN860
370 IFK$=CHR$ (13)THEN910
380 IFK$="I"THEN1480
390 IFK$="B"THENCO=15:LINE(
100, 181 )- (108,1 91 ) ,l,BF:COL
ORl 5: PRESET (101, 182) :C$="B"
: PRINT# 1,C$
400 IFK$="E"THEN1710
410 IFK$="S"THEN2200
420 IFK$="G"THEN2120
430 IFK$="P"THENPAINT (X,Y) ,
CO
440 IFK$="N"THEN20
450 GOTO230
460 IFL-1THEN480
470 PSET(X,Y) ,CO
480 IFX>255THENX=0
490 IFY>180THENY=0
500 IFY<0THENY=180
510 IFX<0THENX=255
520 COLORl : PRESET (0, 181) :PR
INT#l,"x=":LINE(16,181)-(48
,191),15,BF^:PRESET(16,181) :
PRINT#1 , RIG*HT$ (STR$ (X) , LEN (
STR$ (X) )-l)
530 COLORl : PRESET (50, 181) :P
RINT# 1 , "y=" : LINE ( 60 , 1 81 ) - (8
7,191) , 15,BF:PRESET (64, 181)
:PRINT#1,RIGHT$(STR$(Y) , LEN
(STR$(Y))-1)
540 GOTO230
5S0
★★★★★★★★★
560 COLOR
570
★★★★★★★★★
580 IFC$="B"THEN590ELSEC=C+
1
590 LINEdOO, 181)-(108, 191)
, 1,BF; COLORl 5
600 IFC=2THENCO=4 :C$="A"
610 IFC=3THENCO=2 :C$="V"
620 IFC=4THENCO=9:C$="R"
630 IFC”lTHENCO=l:C$="N"
640 IFC>=5THENC=l:GOTO600
650 COLOR15:PRESET(101, 182)
: PRINT# 1,C$: LINE (0, 180) -(25
5,180) ,CO:RETURN
660
670 ' FIGURA
680
★★★★★★★★★
690 F=F+1
700 IFF=lTHENCOLOR15:F$="RE
CTA"
710 IFF=2THENCOLOR14:F$="RE
CTANGULO"
720 IFF=3THENF$="CIRCUNFERE
480-510: control del l^piz
520-540: imprime coordenadas del I6-
piz
550-650: cambios de color
660-760: cambia la figura que se va a
770-850: cambia si el lapiz dibuja o no
860-900: ubicacion del primer punto
910-1470: realize el dibujo
1480-1700: saca el dibujo por el “plo-
tter”
1710-2110: modo texto
21 20-21 90: carga un dibujo de disque-
te a computadora
2200-2270: graba el dibujo en disquete
2280-2340: rutina de errores
realizar
NCI A"
730 IFF=4THENF$="TRIANGULO"
740 IFF=5THENF=l:GOTO700
750 LINE(130,181)-(248,191)
, l,BF:COLOR15:PRESET(134, 18
2) :PRINT#1,F$
760 GOTO230
770 '★★★★*★★*★★***★****★***
780 ' LAPIZ
790
'kickick-k'k'k'k
800 LINE(111,181)-(126,191)
, 1,BF:L=L+1
810 IFL=2THENCOLOR15:L$="SD
W
820 IFL=lTHENCOLOR15:L$="ND
W
830 IFL=3THENL=l:GOTO810
840 PRESET (112, 182) :PRINT#1
,L$
850 GOTO230
860
870 ' PRIMER PUNTO
880
★★★★★★★★★
890 M=X : N=Y : COLORl : PRESET ( 8
9,182) :PRINT#1,"["
900 GOTO370
910
920 ' DIBUJO
930 '**********************
*********
940 COLOR15:PRESET(89,182) :
PRINT#1,"["
950 IFF=1THENLINE(M,N)-(X,Y
) ,CO
960 IFF=2THENLINE(M,N)-(X,Y
) ,CO,B
970 IFFO3THEN12 60
980 LINE(0, 170)-(255,191) ,1
5,BF
990 V=0:W=0: COLORl
1000 PRESET (1, 181) : PRINT# 1,
"Angulo inicial LINE (124 ,
181) -(156, 191) , 15, BF; PRESET
(124, 181) :PRINT#1,V
1010 K$=INKEY$:IFK$=""THEN1
030
1020 IFK$=CHR$ (29)THENV=180
1030 IFK$=CHR$ (31)THENV=270
1040 IFK$»CHR$ (30)THENV=90
1050 IFK$=CHR$ (28)THENV=0
1060 IFK$="-"THENV=V-1
1070 IFK$="="THENV=V+1
1080 IFV<0THENV=360
1090 IFV>360THENV=0
1100 IFSTRIG(0)THEN1110ELSE
1000
1110 LINE(0, 181)-(255, 191) ,
15, BF
1120 PRESET (1, 181) :PRINT#1,
"Angulo final LINE (108, 18
1)-(140,191) ,15,BF:PRESET(1
08,181) :PRINT#1,W
1130 K$=INKEY$:IFK$=""THEN1
150
1140 IFK$=CHR$ (29) THENW«180
1150 IFK$=CHR$ (31) THENW=270
1160 IFK$-CHR$ (30)THENW-90
1170 IFK$=CHR$ (28)THENW-0
1180 IFK$="-"THENW=W-1
1190 IFK$="-"THENW“W+1
1200 IFW<0THENW=360
1210 IFW>360THENW-0
1220 IFSTRIG(0)THEN1230ELSE
1120
1230 AI=V/57.32:AF=W/57.32
1240 R-SQR( (M-X) -'2+(N-Y) ■'2)
1250 CIRCLE (M, N) ,R, CO, AI,AF
12 60 IFFO4THEN1470
1270 LINE (0, 170) - (255, 191) ,
15, BF
1280 COLORl : AR$=" (Der. o ar
riba) o (Izq. o abajo)":FOR
AR=1T032 : ER$=MID$ (AR$ , AR, 1 )
:PRESET(R, 181) tPRINTtl , ER$ :
R=R+6:NEXT
1290 K$=INKEY$:IFK$=""THEN1
290
1300 IFK$="I"ORK$-"D"THEN13
10ELSE1290
1310 IFY>NTHENSWAPX,M:SWAPY
,N
1320 IFY=NTHENIFX<MTHENSWAP
X,M
1330 D=N-Y:E«X-M:IFE<0THENE
=-E
1340 A=SQR(D'‘2+E^2) rIFXOMT
HENQ=ATN(D/E) ; G=2 . 09-Q: O- . 5
23-Q:H=COS (G) *A: I-SIN (G) *A:
J=COS (0) *A: K=SIN (0) *A
1350 IFK$»"I"ANDX=MTHENQ-SQ
R(A''2-(A/2) “'2) :LINE (X,Y)-(M
, N) , CO: LINE (X, Y) - (X+Q, Y+A/2
) , CO: LINE (M,N)- (X+Q, Y+A/2) ,
CO:GOTO1470
1360 IFK$="D"ANDY»NTHENQ=SQ
R(A^2-(A/2) ^2) :LINE(X,Y)-(M
,N) ,CO:LINE(X,Y)-(X-A/2,Y-Q
) ,CO:LINE(M,N)-(X-A/2,Y-Q) ,
CO:GOTO1470
1370 IFK$“"I"ANDY=NTHENQ=SQ
R(A^2-(A/2) ^2) :LINE(X,Y)-(M
,N) ,CO:LINE(X,Y)-(X-A/2,Y+Q
) , CO: LINE (M,N)- (X-A/2,Y+Q) ,
CO:GOTO1470
1380 IFK$="D"ANDX=MTHENQ=SQ
R{A^2-(A/Z)^2) :LINE (X,Y)-(M
,N) ,CO:LINE(X,Y)-(X-Q, Y+A/2
) ,CO:LINE(M,N)-(X-Q, Y+A/2) ,
CO:GOTO1470
1390 IFK$="D"ANDP>.523ANDX>
MTHENLINE(X,Y)-(M,N) , CO: LIN
E(X,Y)-(M-H,N-I) ,CO:LINE(M,
N)-(M-H,N-I) ,CO
1400 IFK$-"D"ANDP<.523ANDX>
MTHENLINE(X,Y)-(M,N) ,CO:LIN
E(X,Y)-(M+K,N-J) ,CO:LINE(M,
N)-(M+K,N-J) ,CO
1410 IFK$“"D"ANDP>.523ANDX<
MTHENLINE (X,Y)- (M,N) ,CO:LIN
E (X,Y)- (X-H,Y+I) ,CO:LINE(M,
N)- (X-H,Y+I) ,CO
1420 IFK$="D"ANDP<.523ANDX<
MTHENLINE (X,Y)-(M,N) , CO: LIN
E (X,Y)- (X+K,Y+J) , CO: LINE (M,
N)- (X+K,Y+J) ,CO
1430 IFK$="I"ANDP>.523ANDX<
MTHENLINE (X,Y)-(M,N) , CO: LIN
E (X,Y) - (M+H,N-I) ,CO:LINE(M,
N)-(M+H,N-I) ,CO
1440 IFK$="I"ANDP<.523ANDX<
MTHENLINE (X,Y) - (M,N) ,CO:LIN
E(X,Y)- (M-K,N-J) ,CO:LINE(M,
N)- (M-K,N-J) ,CO
1450 IFK$-"I"ANDP>.523ANDX>
MTHENLINE (X,Y)- (M,N) , CO: LIN
E(X,Y)-(X+H,Y+I) ,CO:LINE(M,
N)-(X+H,Y+I) ,CO
Pag. 26
1460 IFK$="I"ANDP<.523ANDX>
MTHENLINE(X,Y)-(M,N) , CO: LIN
E (X, Y) - (X-K, Y+ J) , CO: LINE (M,
N) -(X-K,Y+J) ,CO
1470 M=X:N=Y:GOTO170
1480 ^ ic if "k ir 'k "k 'k ic "k "k it "k "k "k ic "k i( i( ir i(
•kkkitkkkkk
1490 ' PLOTTER
1500 '*★★★**★★*★**★★★★★*★★*
★★★★★★★★★
1510 LPRINTCHR$ (27)+"#":X=0
:Y=0:M*=0:N“0:Z=1
1520 FORY=0TO180:N=Y
1530 FORJ-0TO2
1540 FORX=0TO255
1550 P=POINT(X,Y)
1560 IFINKEY$=CHR$ (27) THENG
OTO230
1570 IFP=15THENZ=l:GOTO1650
1580 IFP=9THENCC=3
1590 IFP=4THENCC=1
1600 IFP-1THENCC=0
1610 IFP=2THENCC=2
1620 IFZ=1THENLPRINT"M";M*3
+3 ; " , " ; -N* 3- J; " , " ; X* 3 ; " , " ; -
Y*3-J
1630 LPRINT"C";CC
1640 LPRINT"D" ; X*3 ; " , " ; - Y* 3
- J; " , " ; X* 3+3 ; " , " ; -Y* 3- J : M-X
:N=Y:Z=0
1650 NEXTX
1660 Z-1
1670 NEXTJ
1680 Z=1
1690 NEXTY
1700 GOTO230
1710 '*********************
*********
1720 ' ESCRIBIR
1730 '*********************
*********
1740 LINE(89,181)-(255,191)
, 15, BF: LINE (125, 180) -(133, 1
90) ,l,BF:COLOR15:PRESET(127
,181) : PRINT# 1, "E"
1750 FORA=lTO10:KEY(A)ON:NE
XT
1760 K$=INKEY$:IFK$=""THEN1
760
1770 IFK$=CHR$ (&H1D)THENX=X
-1
1780 IFK$=CHR$ (&H1E)THENY=Y
-1
1790 IFK$=CHR$ (&H1C) THENX=X
+1
1800 IFK$=CHR$ (&H1F) THENY=Y
+1
1810 IFX>255THENX=0
1820 IFY>180THENY=0
1830 IFY<0THENY=180
1840 IFX<0THENX=255
1850 PUTSPRITEO, (X,Y) ,CO,0
1860 COLOR1:PRESET(0, 181) :P
RINT#1, "x=" :LINE (16, 181) - (4
8.191) ,15,BF:PRESET(16,181)
: PRINT# 1, RIGHT$ (STR$ (X) ,LEN
(STR$ (X))-l)
1870 COLOR1:PRESET(50,181) :
PRINT#l,"y=":LINE(60, 181) -(
87.191) ,15,BF:PRESET(64,181
) :PRINT#1,RIGHT$(STR$ (Y) , LE
N(STR$ (Y))-l)
1880 IFSTRIG(O) =-lTHEN1890E
LSE1760
1890 COLORl:LINE(145,180)-(
153,190) ,1,BF
1900 K$=INKEY$:IFK$=""THEN1
900
1910 FORA=10TO12:IFK$=CHR$(
A)THEN1900
1920 NEXT
1930 F0RA=27T031 : IFK$=CHR$ (
A)THEN1900
1940 NEXT
1950 IFK$=CHR$(18)THEN1900
1960 IFK$=CHR$(127)THEN1900
1970 IFK$=CHR$ (24)THEN1900
1980 IFK$-CHR$(8)THEN2080
1990 COLORCO: PRESET (X,Y-8) :
BEEP: PRINT# 1,K$
2000 X=X+7:IFX>248THENX=0:Y
=Y+8
2010 IFY>173THENY=Y-8
2020 IFK$=CHR$ (13) THEN: LINE
(45,180)-(53,190) ,15,BF:GOT
01740
2030 IFK$=CHR$(9)THENLINE(2
5,180)-(33,180) ,15,BF:G0T01
70
2040 PUTSPRITEO, (X,Y) , CO, 0
2050 COLOR1:PRESET(0, 181) :P
RINT#1, "x=":LINE(16,18D- (4
8.191) ,15,BF:PRESET(16,181)
:PRINT#1,RIGHT$ (STR$ (X) , LEN
(STR$ (X))-l)
2060 COLORl : PRESET (50, 181) :
PRINT#l,"y=":LINE(60,181)-(
87.191) ,15,BF:PRESET(64,181
) :PRINT#1,RIGHT$ (STR$ (Y) , LE
N(STR$(Y) )-l)
2070 GOTO1900
2080 X=X-7:IFX<0THENX=247:Y
=Y-8
2090 COLOR15:PRESET(X,Y-8) :
BEEP:PRINT#1, " ["
2100 IFY<8THENY=Y+8
2110 GOT02040
22^20 ^ k k it it k it it k it k i( icic k k k k k k k k
kkkkkkkkk
2130 ' GRABAR
2140 ^ k k k k k k k k k k k k k k k k k k k k k
kkkkkkkkk
2150 CLOSE : SCREENO : COLOR 1,
15, 15
2160 PRINT:NAM$="": INPUT" (N
OMBRE DEL PROGRAMA";NAM$
2170 IFNAM$=""THENFILES:GOT
02160
2180 SCREEN2:BLOADNAM$,S
2190 RESTORE160:X=0:Y=0:GOT
0140
2200 ^ k k k k k k k k k k k k k k k k k k k k k
kkkkkkkkk
2210 ' SALVAR
2220 '*********************
2230 LINE(0,169)-(255,191) ,
15, BF
2240 PRESET (0, 181) : COLORl :P
RINT#1, "PRESIONE LA BARRA P
ARA GRABAR"
2250 IFSTRIG(0)=-1THEN2260E
LSE2250
2260 PUTSPRITEO, (255, 191) ,1
5,0:LINE(0, 170) -(255, 191) ,1
5,BF:BSAVE NOM$ , 0 , 1 6383 , S
2270 GOTO230
2280 ^kkkkkkkkkkkkkkkkkkkkk
kkkkkkkkk
2290 ' ERRORES
2300 '*********************
★★★★★★★★★
2310 IFERR=53ANDERL=2180THE
NSCREENO: COLOR 1, 15: PRINT "P
ROGRAMA NO EXISTENTE EN DIS
CO. PRESIONECUALQUIER TECLA
":IM$=INPUT$(D :RESUME2120
2320 IFERR=70ANDERL=2180THE
NSCREENO: COLOR 1,15:PRINT"D
ISQUETERA DESCONECTADA . CON
ECTELA Y PRESIONE CUALUI
ER TECLA" : IM$-INPUT$ (1) :RES
UME2120
2330 IFERR=70ANDERL=2260THE
NSCREENO: COLOR 1,15:PRINT"D
ISQUETERA DESCONECTADA. CON
ECTELA Y PRESIONE CUALUI
ER TECLA" : IM$=INPUT$ (1) : RES
UME2200
2340 ONERRORGOTOO:END
Pag. 27
PLUNDER
Tipo: Juego
Autor: Jorge Prieto
PARTICIPO EN EL 4*^ CONCURSO DE PROGRAMAS
nestejuegohayquellegarala
caja fuerte subiendo las tres
HHI escaleras qua se van an la
pantalla. Sa daba tanar cukJado con los
vigilantas, ya qua 6stos vandrdn a a-
prasarnos an cuanto datactan nuastra
prasancia. Por asta motivo dabaramos
apalar a todo tipo da maniobras da dis-
traccibn.
El tiampo pasa y bsta as otro inconva-
nianta, porqua si no llagamos antas da
los 60 sagundos, sonarb una alarma.
Cuando llaguamos a la caja, pasara-
mos a la sagunda parta dal juago. AIK
tandramos qua descubrir la combina-
ci6n. Cuanto mdsdinaro robamos, mbs
tandramos an al banco y asto nos darb
10 00 PRESENTACION 00
20 COLOR12,l,l:SCREEN2,2
30 PSET(0,120) :DRAW"S4cl2e5
r20ng5d20g5110ndl515d20ne51
5u4 Or 20d2 ObhSul 01 1 Odl Orirl Oe
5nu4r4"
40 PSET(36,72) :DRAW"S3cl2d3
8r20u7113u3317©4r7ng4d33rl3
ng4d7g4”
50 PSET(71,45) :DRAW"S2cl2d3
5f5rl5el0u3517g4r7ne4nd3517
d29g414h4u2917e4r7ng4d29f4r
4"
60 PSET(117,18) :DRAW"S2cl2d
40r6u27flldl6r6u4016dl0hl01
7"
70 PSET(167,45) :DRAW"cl2d40
rl4e6u28hl0114f4nrl4h4d40f4
brl0bu8e3h4nul7f4ul8h315d24
r5h4e3"
80 PSET(198,77) :DRAW"S3cl2D
40R2008h4nL8f4112U8rl2u8h4n
18f4112u8rl2u8nl20h4120nf4d
40f4"
90 PSET(232,115) :DRAW"S4cl2
D40R5020R2F8D12R6013H7R5R2U
20nL20h4120nf4d40f4Be5bu20n
rl0U10rl0D10h5NU414" :Y-245
100 Y-245
110 F0RCC-1T02: PLAY"19acrl
Ofedcb-rlOgb-rlOedcb-arlOfa
rlOdcb-agrlO" :NEXT
120 F0RCC-1T02 : FORB-OTOl:
C-B+3:D-180+B*4 : FORA-OTOl
23STEP4:X-D-A : LINE(A,X)-(
Y-A,X),C ; NEXT : NEXT : NE
XT
130 ONINTERVAL-50GOSUB330 :
ONSPRITEGOSUB37 0 ; RE-5000
1 40 OPEN"grp : "FOROUTPUTAS# 1
150 COLORl 2,1: SCREEN 0 : KE YOF
F:LOCATE10,0:PRINT"O PLDN
DER O"
160 LOCATEO, 8:PRINT"1 _ JOY
STICK" : LOCATEO ,10: PRINT" 0 _
CORSORES":TS$-INPDT$(l) :TS
-VAL(TS$) :DE-300:PT-0: IFTS$
<>" 1 "ANDTS$<>" 0"THEN1 6 0
170 IFDE<0THENPSET(0,155) :P
RINT#1 , "QUEDA DETENIDO" : FOR
C-1T05000 : NEXT : GOT0150
180 FORC-1T02500:NEXT
190 GOSOB520
200 ' 00 ACCION 00
210 ST-STICK(O) : IFH-70ORH
-12 OORH-1 7 0THENIFST-3THENV-
V+5ELSEIFST-7THENV-V-5
220 IFV-E(1)ANDH<750RV-E(2)
ANDH>65ANDH<1250RV-E (3) ANDH
<17 5THENIFST-5THENH-H+5ELSE
IFST-lTHENH-H-5
230 IFV-E(1)ANDH-150RV=E{2)
ANDH-650RV-E (3) ANDH-1 15THEN
H-H+5
240 IFV-E (1 ) ANDH-750RV-E (2 )
ANDH-1 2 50RV-E ( 3 ) ANDH-1 7 5THE
NH-H-5
250 PR-INT (ST/2+1.5) : PUTS
PRITEl, (V,H) ,1,PR
260 FORD-9TO10 : IFU-9THENH
M-120ELSEHM-70
270 IFM0(0)>5THENVM-VM+AMEL
SEVM-VM-AM
280 IFVM>180THENVM-VM-10
290 IFVM<10THENVM-VM+10
300 PUT SPRITE U, (VM,HM),1,
6 : NEXT : IFV-E (DANDH-35T
HEN880
P^K.28
mils posibilidades de pagar la fianza y
salir de la cSrcel cuando seamos apre-
sarnos.
En la caja fuerte figuran los numeros
del 1 al 6. Con ellos se forma la combi-
nacidn. Tendremos que acertarla ju-
gando al juego de bs nOmeros. La can-
tidad que se indica debajo de COR es la
cantidad de nOmeros que estan en la
combinacbn y que se encuentran en el
lugar correcto. La columna INC da la
cantidad de nOmeros que estSn en la
combinacbn pero que no se encuen-
tran en el lugar correcto.
Para la presentacbn se empleo una
melodfa agradable que se oye al tiem-
po que aparece el nombre del juego.
ESTRUCTURADEL
PROGRAMA
10*120 Presentacbn
150-160 Menu
200-310 Accbn
320-350 Tiempo
360-500 Pantalla “capturado”
510-870 Pantalla “accbn”
880-1030 Pantalla “caja fuerte”
1040-1080 C^lculo de combinacbn
1090-1280 Apertura de caja
1290-1310 Llave no descubierta
1320-1350 Calculo monto robado
310 GOTO210
440 FORCC=0TO2:W$=""
580 NEXTJ
320 ' 00 TIEMPO 00
450 LINE (0,20+ (CC*20) ) - (25
590 SPRITES (A) =S$
330 SS-SS-1 : BEEP : LINE (1
6,22+(CC*20) ) ,1,BF
600 NEXT A
22,20)-(150,30) ,2,BF : PSET
460 READW$ : PSET (0, CC*24) :
610 F0RT=1T06 :F0RQ=1T04 :REA
(126,20) ,2:PRINT#1,SS
PRINT#1,W$ : NEXTCC
DZ(Q) :NEXTQ
340 IFSS-0THEN370
470 RO=RO+l : FI (RO) =100*NR
620 LINE(Zd) ,Z(2))-(Z(3) ,Z
350 FORA-9TO10:MO(A)=RND(l)
* (RO*3)
(4)),14,BF : NEXT: M=0
*10: NEXT: RETURN
480 FORCC=lTORO : PSET (0,65
630 F0RA=1T03:E (A)=(INT(RND
360 ' 00 PANTALLA - CA
+CC*15) :PRINT#l,"ROBO" : PS
(-TIME) *10) ) *15+20 :NEXTA
PTURADO 00
ET(90, 65+CC*15) :PRINT#1,"$"
640 IFE(2)=E(l)ORE(2)=E(3)T
370 INTERVALOFF : F0RCC=1T01 0
; FI (CC) : NEXTCC
HEN630
: SOUNDS, 16: S0UND13,1:S0UN
490 DE=DE-FI (RO) : PSET(0,17
650 FORA=36TO136STEP50
DO, 60:SOUND1,0:SOUND11,230:
0) .-PRINT# 1, "LA FIANZA SE DE
660 M=M+1
SOUND 12 , 35 : FORAA=lTO90 : NEXT
BITO DE SU CUENTA"
670 FORC=1T050STEP5
AA: NEXTCC
500 PSET(180, 80) :PRINT#1, "$
680 LINE(E(M)+15.A+C)-(E(M)
380 SPRITEOFF
";DE : GOTO170
,A+C+1) ,14,BF
390 F0RCC=1T05 : SOUND7,&BO
510 ' 00 PANTALLA ACCI
690 NEXTC
0111110:SOUND8, 14 : SOUNDO,
ON 00
700 FORD=0TO15STEP15
170:SOUND1, 0
520 COLORl,6: SCREEN2 : V=2
710 LINE(E(M)+D,A+50)-(E(M)
400 FORJ=1T0200:NEXT
0:H=170:VM=80:NR=NR+1 : RES
+D,A) ,14,BF
410 SOUNDO, 150 :SOUND1,0 : F
TORE : AM=2.5+NR/2 : SS=50:
720 NEXTD
ORJ-1T0200:NEXT : NEXTCC :
IFPT>RETHENRE=PT
730 NEXTA
SOUNDO, 0 : SCREEN2
530 F0RA=1T06
740 LINE (0, 0) -(256, 31) ,2, BF
420 LINE(0,20)-(165,165) ,3,
540 S$=""
'750 PSET(8,1) :PRINT#1,"PUNT
BF
550 F0RJ«=1T032
OS: ";PT
430 LINE(165,20)-(256,165),
560 READD
760 PSET(8, 10) :PRINT#1, "BAN
10, BF
570 S$=S$+CHR$ (D)
CO :";DE
INFORMA:
hsrdy computaddn srI
SERVICE OFICIAL CZERWENY
SERVICE OFICIAL PARA TODO EL PAIS REPUESTOS
ORIGINALES PARA TODA LA LINEA CZY ZX
ASESORAMIENTO INTEGRAL (IBM - APPLE) EN SOFTWARE
HARDWARE Y TELEINFORMATICA
PRESUPUESTOS EN 48 hs . ENVIOS AL INTERIOR
ITUZAINGO 884 CAP. (1272) TE . 362-5876/361-4748 DELPHI:ANGEL
Pag. 29
770 PSET (115, 1) ;PRINT#1, "
ROBOS :";NR
780 PSET (195, 1) :PRINT#1, "
RECORD"
790 PSET (115, 10) :PRINT#1,
"TIEMPO"
800 PSET(195,10) ,2:PRINT#
I, RE
810 TIME=0:SPRITEON: INTER
VALON : RETURN
820 DATA3,3, 3, 1, 15, 15, 15,
II, 8,15,7,6,6,6,6,14,192,
192.192. 128.240.240.240.2
08,16,240,224, 96, 96, 96, 96
,112,11,11,11, 9,15,15,7,3
,0,7,7, 6, 6, 6,0,0,192,192,
192, 144,240
830 DATA240, 240, 192, 0,224
,224,96, 96,96, 96, 96,3,3,3
,3,15,19,19,19,0,3,3,3,31
,30,16,0,192,128,128,0,12
8.128.240.128.0. 192.224.9
6, 96, 96, 96,112,11,11, 11,9
,15, 15, 7, 3, 0,7, 7, 6, 6, 6,0,
0, 192, 192, 192, 144,240,240
,240, 192,0,224,224, 96, 96,
96, 96, 96,3,1,1,0,1,1,15,1
,0
840 DATA3,7,6,6,6,6,14,19
2,192, 192,192,240,200,200
,200, 0, 192, 192, 192,248, 12
0,8,0,0,0,3,7,15,31,51,51
,191, 191,255, 191, 191, 63,2
4.60.0. 0.192.224.240.248,
204.204.253.253.255.253.2
53,252,24, 60
850 DATA0,195,200,187,0,1
42,200,137, 0, 92,200,87, 0,
42,200,37,200,37,256,195,
0,37,5, 195
860 DATA"RECUERDE QUE TOD
O LO QUE DIGA PUEDE SER
US ADO EN SU CONTRA . . " , "
ANTECEDENTES BANCO
","DELITO FIANZA
EXISTENTE"
870 ' 00 PANT - CAJA
FUERTE 00
880 INTERVALOFF: FORCC=lT
02 : PLAY"L11C6DFD4CFGFBE
AF" : NEXTCC
890 COLOR, 4 : SCREEN2 : PT=P
T+130*NR
900 PSET (1, 1) :PRINT#1, "PR
ESIONE LA BARRA PARA ESCA
PAR. ."
910 LINE(165,18)-(230,157
) ,5,BF
920 PSET(175,25) :PRINT#1,
"TIEMPO"
930 PSET (175, 105) :PRINT#1
, "BANCO" : PSET (175, 125) , 5 :
PRINT#1,DE
940 PSET (175, 65) :PRINT#1,
"PUNTOS" :PSET (175, 85) , 5:P
RINT#1,PT
950 LINE(0,17)-(48,57) ,3,
BF
960 LINE(0,57)-(48, 157) ,1
0,BF
970 LINE(48,17)-(124,57) ,
2,BF
980 LINE(48,57)-(124,157)
,11,BF
990 FORCC=17TO157STEP20 ;
LINE(0,CC)-(124,CC+1) ,1,
BF : NEXT
1000 FORCC=0TO48STEP16 :
LINE (CC, 17) - (CC+1, 157) , 1,
BF ; NEXTCC
1010 LINE(84,37)-(85,157)
,1,BF
1020 PSET(0,25) :PRINT#1, "
123 POSICION"
1030 PSET (0, 45) :PRINT#1, "
456 COR INC"
1040 ' 00 CALCULO CO
MBINACION 00
1050 F0RCC=1T03
1060 CL(CC) =INT ( (RND (-TI
ME) *10) /2) +1
1070 FORAA=OTOCC-1:IFCL(C
C)=CL(AA)THEN1060
1080 NEXTAA: NEXTCC :TIME=0
1090 ' 00 HABRA L C
AJA 00
1100 FOR NT=1T05
1110 NI=0:NC=0
1120 F0RCC=1T03
1130 1$ (CC)=INKEY$
1140 FORAA=lTOCC
1150 IFSAOSBTHENLINE (175
, 45) - (205, 63) , 5,BF:SB=SA:
PSET (175, 45) ,5:PRINT#1, 99
-SA
1160 SA=INT (TIME/50)
1170 IFSTRIG(0)O0THEN130
0
1180 IFI$ (CC)=I$ (AA-l)ORI
$ (CC) <>"1”ANDI$ (CC) <>"2"A
NDI$ (CC) <>"3"ANDI$ (CC) <>"
4"ANDI$ (CC) <>"5”ANDI$ (CC)
<>"6"THEN1130
1190 NEXTAA
1200 J=VAL(I$ (CC) )
1210 F0RAA=1T03 : IFJ=CL (
AA) THENNI=NI+1
1220 NEXTAA
1230 IFJ=CL (CC) THENNC=NC+
1
1240 PSET (16*CC-16, 45+NT*
20) :PRINT#1," ";I$(CC) :
NEXTCC
1250 PSET (72-16, 45+NT*20)
, 10 :PRINT#1,NC;" ";NI-N
C
1260 IFNC=3THEN 1320
1270 IFSS=99THEN370
1280 BEEP ; NEXT NT
1290 ' 00 CLAVE NO D
ESCUBIERTA 00
1300 PSET (0, 170) :PRINT#1,
"MALA SUERTE EH ! . . "
1310 FORCC= 1 T02 0 0 0 : NEXTCC
: GOTO 190
1320 ' 00 CALCULO MO
NTO ROBADO 00
1330 BO=(1000-200*NT)+( (1
00-SS) *2) +(300*NR) +100
1340 PSET (0, 170) :PRINT#1,
"MONTO ROBADO $";BO
1350 FORCC=lTO2000 zNEXTCC
: DE=DE+BO : PT=PT+BO :
GOTO190
Pae. 30
CONCURSO nEHSURL
PREM
Un soft a
eleccion entre
CONCURSO riENSURL
IDEA BASE. IDEA TEXl o
BASIC TUTOR.
Auspiciado por TELEMATICA S.A. fabricante en Argentina de las computadoras
personates TALENT MSX
Para participar en este certamen deben senalar cual es la informacion correcta que presenta cada
Item. Junto con las respuestas deben remitir los datos en el co^espondiente cupon. Los premios
se entregaran en la administracion de la editorial. Los que no puedan concurrir pueden solicitar
el envio pagando el franqueo contrareembolso. Los premios podran ser reclamados dentro de los
120 dias despues de haber sido anunciados.
Ganador del MSX-TEST 8
Juan Ignacio Solari, Gualeguay - Entre Rios
Respuestas correctas
1) a- inglesa. 2) a- 24.
3) b- CTRL y N. 4) c- LLIST. 5) c- ... ajedrez.
EMILIO BUTRA-
GUENO FUTBOL
Desde ahora el Santiago
Bernabeu no sera el unico
sitio en donde podamos ver
a este espanol, considerado
por muchos como uno de los
tiempos.
La maxima estrella de futbol
hispano ya tiene su propio
software comp antes lo ha
tenido, por ejempio, el bas-
quetbolista Fernando Mar-
tin.
Este programa intenta re-
producir con la mayor fideli-
dad posible el desarrolio de
un partido de futbol: cada e-
quipo esta form ado por once
jugadores que pueden pa-
sarse entre sf la pelota. Los
jugadores pueden tirarse a
los pies del contrario y tam-
bien cometer faltas, por las
cuales ser^n severamente
reprepdidos por el arbitro del
encuentro.
Tambien se producen otras
alternativas como saques
de banda y corners.
El campo de juego se ve
desde arriba. Para hacer un
pase debemos apuntar con
el joystick y luego disparar.
Al arquero parece que le
gusta volar mucho, ya que lo
hace aun para atajar las pe-
lotas mas f^ciles.
El programa permits jugar
frente a un amigo o contra la
computadora.
La opcion entre dos jugado-
res nos entusiasmo mucho
por que se puede jugar, ha-
cer pases y desarrollar el
partido de una manera proli-
ja. En cambio cuando se jue-
ga contra la computadora
hay algunos defectos para
marcar: ladesaparicibnde la
pelota del ^rea de visibn en
cruces poco claros de juga-
dores.
El sonido incluye efectos co-
mo silbato, ruido de tribuna,
etcetera.
El Emilio Butragueno Futbol
es un programa que sin lle-
gar al nivel del clasico Soc-
cer Konami es recomenda-
ble para todos los amantes
del mas popular de los de-
portes. (Distribuyen: REAL
TIME - RED POINT)
1942
Para MSX2
En diciembre de 1941 la flo-
ta norteamericana fua ata-
cada por los japoneses en
Pearl Harbor y los Estados
Unidos entraron en la gue-
rra.
En este juego representa-
mos a un piloto que sale de
un portaviones paraderribar
la mayor cantidad posible de
japoneses.
El juego tiene 32 etapas y Ne-
va a un gran nivel de tension
y adiccion, sobretodo si no
tenemos un joystick con dis-
paro automatico.
Una vez que el avion sale del
portaviones, hacemos un
"loop” de manera automati-
cay luego comienzan a apa-
recer los aviones enemigos.
Cada uno tiene su puntaje
aunque debemos marcar un
pequeho error historico: los
japoneses no tenian super-
bombarderos B-29 como los
que aparecen en el juego.
Para disparar, simplemente
basta con apretar el botbn o
la barra espaciadora. Un dis-
paro basta para derribar a
los mbs pequehos. En cam-
bio a los grandes hay que
perseguirlos y dispararles
repetidamente.
Si pasamossobre los secto-
res que tienen la leyenda
POW ganaremos puntos a-
dicionales y en ocasiones se
nos duplicaran las armas,
cosa que si la sabemos a-
provechar nos hace casi in-
munes.
Si estamos en alguna situa-
cion muy comprometida po-
demos hacer un "loop” para
esquivar a nuestros enemi-
gos. La forma de realizarlo
es apretando latecia SHIFT
o GRAPH. Pero tenemos
que tener mucho cuidado y
no abusar de esta maniobra,
ya que s6lo tenemos la posi-
bilidad de hacerla tres veces
en cada mision.
Concluida la mision o el jue-
go, si es que perdemos, el
programada una estadistica
con la cantidad de aviones
enemigos derribados y el
porcentaje alcanzado.
Pueden jugar uno o dos ju-
gadores. (Distribuyen: RED
POINT - REAL TIME)
BLACK BEARD
Elmar Caribe esta tranquilo,
pero no por mucho tiempo.
En la isla de Tortuga ha y un
encuentro muy particular. El
que ha sido refugio del capi-
tcin Henry Morgan ytantoso-
tros corsarios es el lugar ele-
gido para que Horuc, mas
conocido como Barbarroja,
y el temible Black Beard, a-
lias Barbanegra, decidan el
reparto del botm que han
juntado durante anos.
En la taberna corre el ron y
Barbanegra comete el error
mbs grande de su vida: pier-
de el control de sf mismo y
toma en demasfa. Esto pro-
voca efectos en su cerebro y
la momentbnea alegrfa' lo
Neva a hablar dembs y a re-
velar donde tiene escondido
su mapa.
El resto es muy fbcil para Ho-
ruc. Con la promesa del bo-
tfn soborna a la tripulacion
de Barbanegra y se apodera
de su bergantfn haciendo
prisionero al capitbn. Aquf
comienza el juego. Noso-
tros, tomando la personali-
dad de Barbanegra, debe-
mos ir en busqueda de la
venganza, matando a nues-
tros enemigos y recuperan-
do el piano del tesoro.
El bergantfn cuenta con la
cubierta, una zona de cama-
rotes y dos bodegas. Entre
los camarotes y las bodegas
hay escondidos diez cofres.
En uno de ellos se encuentra
una antorcha. Este es el pri-
mer objeto que debemos u-
bicar para despues ir con e-
lla hasta el canon que estb
frente al puente y destruirlo.
Asf evitaremos que lleguen
los refuerzos de Barbarroja.
Las armas con que conta-
mos son pistolas y puhales
que encontraremos en la cu-
bierta y en el suelo de las bo-
degas. Pero cuidado con las
que estbn sobre las rejillas,
ya que en muchas de ellas
hay colocadas trampas.
Adembsdelas armas, pode-
mos encontrar algunos otros
mejores futbolistas de estos muchas oportunidades y
Pag. 32
objetos como botellas de
ron. Algunas nos dar^n e-
nergia, en cambio otras nos
ocasionaran una enorme
borrachera.
Hay cinco cofres en la zona
de camarotes, hacia la iz-
quierda de donde se en-
cuentra Barbanegra en el
comienzo. Si encontramos
la antorcha deberemos mar-
char hacia el sector opuesto
del navio y buscar el canon
frente al puente.
Luego hay que iraunadelas
escaleras y buscar los tres
cofres que sehallanen lapri-
mera bodega.
Como ayuda les podemos
decir que uno esta en la es-
quina inferior izquierda y o-
tro en la derecha. El tercero
se encuentra en la parte su-
perior de la pantalla, hacia el
centre de la nave.
Encontrados y abiertos los
tres cofres, debemos pasar
a la segunda bodega, hallar
un cofre en la parte superior
y finalmente dirigirnos hacia
la derecha. Allf descubrire-
mos el ultimo cofre de un co-
lor distinto de los demas. Si
dejamos sin abrir algun co-
fre, este ultimo no se abrira.
Una vez que recojamos el
mapa, acabara nuestra a-
ventura.
Por supuesto que llegar a
este punto no resulta nada
facil por la cantidad de ene-
migos que debemos enf ren-
ter. Sin embargo, para los
que no quieren afrontar ese
desaffo hay una manera de
jugar y llegar con mas facili-
dad al fin del juego. La mis-
ma es presionar simultane-
amente y en cualquier me-
mento las teclas Z,X,Y y U,
para que podamos jugar con
Vidas infinites.
Les deseamos suerte en es-
ta mision y muchos augurios
de futures abordajes. (Distri-
buyen: RED POINT - REAL
TIME)
CHEF
Un libro de recetas computa-
rizado. Este prog ram a con-
tiene mas de setenta recetas
que se pueden consultar de
tres maneras.
La m^s elemental es portftu-
lo. Colocando el nombre de
la comida que queramos
preparer, la computadora
dara la receta que tiene al-
macenada.
La segunda formade consul-
ta es por ingredientes. Aquf
le decimos a la maquina
"chocolate", por ejempio, y la
respuesta sera la lista com-
plete de recetas que inclu-
yan el ingredients pedido.
Por Liltimo, se pueden pedir
recetas por una palabra cla-
ve. La lista de claves es la
siguiente: breakfast (desa-
yuno), dessert (postre), sin-
fully rich (paragolosos), holi-
day (para fiestas), snack
(bocadillos), kids (para chi-
cos), soup (sopas), lunch
(almuerzo), easy (facil), out-
door (al aire libre), main dish
(plato principal), cookies (ga-
lletas), brunch (media
mahana), leftovers (sobras),
bread (pan), potiuck (lo que
haya), ethnic (tradicionales),
vegetarian (vegetarianas),
quick (rapidas), beverage
(bebidas), salad (ensala-
das), appetizer (aperitives),
spicy (picantes) y casserole
(cazuelas).
Tambien por medio de las
palabras claves podemos
ver seis menues que pode-
mos utilizer, por ejempio,
cuando tengamos invitados
a cenar.
Pero las ventajas del CHEF
no terminan allf. Otra de las
cosas que of rece es ingresar
nuevas recetas, por lo que
podremos hacer un receta-
rio de nuestras comidas fa-
vorites.
Posiblemente el principal
inconveniente del programa
sea que tod as las recetas
estan en ingles, problema
que se podrfa solucionar
para proximas ediciones.
Tambien serfa bueno que
salieran nuevos archives
con mas recetas.
Este -programa es una
muestra de que la computa-
cion es aplicable en muchos
campos que parecen aleja-
dos de ella. (Distribuye:
REAL TIME)
DELTA ^ tron
taller de computacidn
Director:
Gustavo O. Delfino
651-4027
CURSOS DE COMPUTACION
para adultos docentes
adolescentes y ninos
BASIC-LOGO-UTILITARIOS
CURSOS DE:
Introduccion a la
Informatica
Programacion BASIC
Planillas de Calculo
Procesadorde Textos
Bases de Dates
Talleres LOGO para
niPos y docentes
Servicio Integral de
Educacion Informatica
a Escuelas Primarias
Y Secundarias
Pag. 33
U Z O N
Para comunicarse con nosotros
dehen escribirnos a *T,oad MSX”,
Parana 720, 5^ Piso, (1017),
Capital Federal,
COBOL
1 . ^Me podrian decir c6mo
utilizar el COBOL para
MSX? Yo s6 c6mo progra-
mar en el COBOL para PC
as! que si pueden decirme
las diferenclas y similitu-
des se lo agradecerla.
2. ^C6mo se juega al A-
LIEN?
3. ^Cu^l es el mejor paque-
te ensamblador/desen-
samblador para MSX?
4. Poseo una disquetera
que puede manejar tanto
el DOS como el CP/M, pero
este ijiltimo no s4 c6mo u-
tilizarlo y en LOAD creo
que no se publicd nada al
respecto. Me interesarla
que publicaran algo.
Muchisimas gracias por
todo.
Guillermo A. Di Camilo
San Miguel
Prov. de Buenos Aires
LOAD MSX
1. Tanto en PC como en
MSX hay varias versiones
del lenguaje COBOL, por lo
que nos tendrias que am-
pliar cuSI de ellas manejas
para diferenciarla de las ver-
siones de MSX que son: MS-
COBOL 80, RM-COBOL 80
y NEVADA COBOL V3.4.
2. El comentario de dicho
juego salio en el numero 25
(mayo de 1988). Hay que
construir un piano de la nave
para luego hacer el mejor re-
corrido y completar el juego.
Para pasar de una sala a o-
tra hay que colocarse delan-
te de una puerta y presionar
el boton disparador.
3. Todo depende de para
que lo necesites. Uno de los
mas completes, ideal para
hacer "debugging”, es el
SIMPLE ASSEMBLER. Pr6-
ximamente le dedicaremos
una nota a este tema en la
seccion Rincon del Usuario.
4. En el numero 28 (agosto
de 1988), publicamos una
nota sobre el CP/M Plus pa-
ra la MSX2. Lo dicho en esa
nota es valido para el CP/M
version 2.2, con las limitacio-
nes de la version.
BLOQUEO DE
TECLAS
Me gustaria saber c6mo
puedo hacer para bloque-
ar las teclas TAB y
CTRL+STOP.
SegOn me comentaron en
TELEMATICA en un nCime-
ro de "Load MSX", el Club
de Usuarios Cerveux pu-
blic6 una rutina para inmo-
vilizar las teclas de curso-
res en los ingresos INPUT
y LINE INPUT.
Todo esto lo necesito para
utilizarlo en un programa
educative que estoy reali-
zando para escuelas pri-
marias de la provincia de
Cbrdoba.
La segunda pregunta tie-
ne relacidn con la unidad
de discos. En mi lugar de
trabajo se instal6 una con-
sola y unidad 555 de Ta-
lent con un cable dlstinto
del convencional. Al car-
gar algunos programas se
presentan errores de lec-
ture.
Como estoy por comprar-
me una disquetera con el
Talent Plan quisiera saber
qu6 conexibn me reco-
miendan.
Por Oltimo, les pido, por fa-
vor, que ampllen un poco
el tamaho de la tipografla
de los listados para poder
leerla con mayor claridad.
Carlos E. A. Macheret
Capital Federal
LOAD MSX
Para ingreso de texto se pu-
blicaron en "Load MSX" dos
rutinas. Una es la que te co-
mentaron, publicada por
Cerveux en el numero 18
(octubre de 1 987). La otra a-
parecio en una nota firmada
por Sergio Segura, en las
paginas 14 y 15 del numero
23 (marzo de 1988). Ambas
rutinas pueden servir para
tus propositos.
Para eliminar el CTRL +
STOP podes colocar en tu
programa la siguiente ins-
truccion:
POKES FBB1,1
Con referenda a la disquete-
ra, por lo que nos comentas
el problema estb en la uni-
dad de discos y no en el ca-
ble de conexion.
MEMORIA
DISPONIBLE
Les escribo para felicitar-
los por su revista y hacer-
les una pregunta. ^C6mo
puedo hacer para determ i-
nar la memoria que tengo
disponible?
Martin Pola
Capital Federal
LOAD MSX
En el BASIC MSX existe el
comando FRE() que cumple
la funcion de dar el numero
de bytes no utilizados por el
BASIC que hay en memoria.
Si el argumento (lo que esta
entre parentesis) es una ex-
presion numerica, lacompu-
tadora indicara el numero de
bytes que pueden utilizarse
para desarrollar programas
en BASIC, almacenar archi-
ves de texto y variables.
En cambio, si el argumento
es alfanumerico, se devuel-
ve la cantidad de memoria
disponible para almacenar
variables alfanumericas.
Pag. 34
COMPUTACION
PARA TODOS
Computadora ^
Personal TPC-31 0
Caracteristicas:
MicroprocesadorZ80A-3,58 MHz.
128 KB de memoria principal.
128 KB de memoria de video.
48 KB de MSX-BASIC Extendido,
Version 2.0.
32 KB de compilador Turbo BASIC.
Inciuye programa en ROM con
cuatro funciones de accesorios:
calculadora, reloj, calendario y
juego de quince.
Almacenamiento permanente de
parametros preferidos: modo de
pantalla, color de fondo, senales
auditivas, mensajes, etc., y
password para control reservado de
acceso.
Teclado profesional ergonomico de
73teclas.
Nuevos modos graficos incluyendo
texto de 80 columnas y resolucion
de 51 2 X 21 2 pixels multicolor.
Reloj con dos alarmas y calendario
permanente con bateria de backup.
Capacidad de sobreimpresion de
imagenesy digitalizacidn de video.
Grabacion de imagenes en diskette.
Soporte de RAM-Disk.
Conozca Talent MSX 2 Ttirbo.
La ventaja de un equipo
profesional de super-tecnologia.
Y la simplicidad de una maquina
de pensar domestica.
Con abundante memoria. Un buen
ienguaje basic incorporado.
Amplias posibilidades de
conexion a perifericos.
Y mas. Por menos.
Porque el future esta cerca.
Tengalo ya.
Soporte de Light Pen.
Conector para perifericos de
digitalizacidn de imagenes.
Salida a TV PAL-N y NTSC con
modulador incorporado.
Salidas para impresora paralela,
video compuesto y RGB analogico
incorporadas.
Totalmente compatible con
software, accesorios y perifericos
deMSXI.
' LL
Tuiho
Live Music
Archive
Librivox
Free Audio
Metropolitan Museum
Cleveland
Museum of Art
Internet
Arcade
Console Living Room
Open Library
American
Libraries
TV News
Understanding
9/11